rotate

引数

xy

大きさ (2,.)の行列.

xy1

大きさ (2,.)の行列.

theta

実数, 角度(単位:ラジアン); デフォルト値は 0.

orig

回転の中心 [xc;yc]; デフォルト値は [0;0].

説明

rotate は角度 thetaを指定した 回転を行います:

xy1(:,i) = M(theta) *(xy(:,i) - orig) + orig

ただし, M は対応する回転行列を意味します.

例

例

xsetech([0,0,1,1],[-1,-1,1,1])
xy=[(0:0.1:10);sin(0:0.1:10)]/10;
for i=2*%pi*(0:10)/10,
  [xy1]=rotate(xy,i);
  xpoly(xy1(1,:),xy1(2,:),"lines")
end