矩阵与图形变换1
#20260728
d=滑动条(0,180,1)
赋值(d,90)
D=重心(t1)
Mc={{1,0,x(D)},{0,1,y(D)},{0,0,1}}
Mrr={{cos((d*1)°),-sin((d*1)°),0},{sin((d*1)°),cos((d*1)°),0},{0,0,1}}
MR=Mc Mrr Mc^(-1)
Arcs5=序列(序列(应用矩阵(Mtu^(j) Mtr^(i) Mc Mr90^(元素(m1,i,j)) Mc^(-1)
,{t1}),i,1,n),j,1,n)