rotate 点の集合を回転

## 呼び出し手順

    xy1=rotate(xy,[theta,orig])

## 引数

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

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