MATLAB源程序代码分享：MATLAB实现正方体绕xyz轴的旋转

House

. \6 \- T2 N4 D  Z. o' ]- g
& h0 l5 v3 G9 N  {8 ]; AMATLAB源程序代码分享：MATLAB实现正方体绕xyz轴的旋转
& v* i. g. W! O1 P+ q5 t
%% 定义正方体的顶点坐标, 并将正方体绘制出来
clear;clc;close all
1 L2 x- ~% }# y+ ~  {5 Nx=[0,1,1,0,0,0,1,1,0,1,1,0,0,0,1,1];    % 正方体顶点的 x 坐标
y=[0,0,1,1,1,0,0,1,1,1,1,1,0,0,0,0];    % 正方体顶点的 y 坐标
& i* e+ S3 L) b. c# N) c! M  Iz=[0,0,0,0,1,1,1,1,1,1,0,0,0,1,1,0];    % 正方体顶点的 z 坐标
& H; B9 P9 O& y6 A3 u  ^$ S- e9 c  e
9 O! L: z) L7 SV=[x;y;z];    % 将正方体顶点的坐标, 保存在一个大的矩阵里, 方便后续计算

7 P; I% I6 q0 u! B; }9 N7 ~figure
7 n, X* f, _" R# k  W5 {! S5 `h=plot3(V(1,: ),V(2,: ),V(3,: ));    % 绘制出正方体
6 S6 c3 _# ~$ j& l8 ~9 b7 y9 \  r, }axis([-2,2,-2,2,-2,2])            % 设置坐标轴的显示范围
8 m6 F" N: ~5 m8 Q0 V8 p/ rxlabel('x')
# Y5 m' J/ d3 C, a1 m0 rylabel('y')
zlabel('z')
grid on
pause(0.02)

%% 将正方体绕 y 轴旋转 60° (pi/3)
for alpha=linspace(0,pi/3,50)
    Ry=[cos(alpha),0,sin(alpha);0,1,0;-sin(alpha),0,cos(alpha)];   % 绕 y 轴旋转的变换矩阵
+ x1 u* T+ Y! w  l3 S0 R    W=Ry*V;                                                        % 执行绕 y 轴旋转的坐标变换, 得到新的坐标值
8 f3 {. E! A  `% u1 k" Q    set(h,'XData',W(1,: ),'YData',W(2,: ),'ZData',W(3,: ))            % 绘制绕 y 轴旋转之后的正方体
    pause(0.01)
end
) ?# e; ^  s& Q( E* z8 R: a
%% 将正方体绕 z 轴旋转 180° (pi)
pause(0.2)
1 z4 ~  ]/ w9 B0 Lfor beta=linspace(0,pi,80)
    Rz=[cos(beta),-sin(beta),0;sin(beta),cos(beta),0;0,0,1];       % 绕 z 轴旋转的变换矩阵
    U=Rz*W;                                                        % 执行绕 z 轴旋转的坐标变换, 得到新的坐标值
    set(h,'XData',U(1,: ),'YData',U(2,: ),'ZData',U(3,: ))            % 绘制绕 z 轴旋转之后的正方体
    pause(0.02)
end
: o" _8 V7 P& ?8 k/ W
%% 将正方体绕 x 轴旋转 45° (pi/4)
pause(0.2)
- i: {+ {; W2 b, \! Z- o) \3 k3 Kfor gamma=linspace(0,pi/4,30)
3 g6 d1 }. k5 h    Rx=[1,0,0;0,cos(gamma),-sin(gamma);0,sin(gamma),cos(gamma)];   % 绕 x 轴旋转的变换矩阵
    S=Rx*U;                                                        % 执行绕 x 轴旋转的坐标变换, 得到新的坐标值
0 F2 S1 |8 }7 i6 Y  g9 q( Y+ u1 w+ T    set(h,'XData',S(1,: ),'YData',S(2,: ),'ZData',S(3,: ))            % 绘制绕 x 轴旋转之后的正方体
    pause(0.02)
% |7 E. g" o7 a) O4 _+ Pend

helendcany

MATLAB实现正方体绕xyz轴的旋转。

Demyar

MATLAB实现正方体绕xyz轴的旋转。