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

House

MATLAB源程序代码分享：MATLAB实现正方体绕xyz轴的旋转
/ ?7 \5 Z  @$ x! C
%% 定义正方体的顶点坐标, 并将正方体绘制出来
clear;clc;close all
" y( I, O+ |2 J/ o4 s7 g, Vx=[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 坐标
z=[0,0,0,0,1,1,1,1,1,1,0,0,0,1,1,0];    % 正方体顶点的 z 坐标

V=[x;y;z];    % 将正方体顶点的坐标, 保存在一个大的矩阵里, 方便后续计算

! {, k9 {) |: q7 |3 j( Ofigure
- _. P5 f5 x- B& j% q( }8 @h=plot3(V(1,: ),V(2,: ),V(3,: ));    % 绘制出正方体
axis([-2,2,-2,2,-2,2])            % 设置坐标轴的显示范围
xlabel('x')
( U5 `5 J) e) }7 D2 G1 N5 z0 Xylabel('y')
zlabel('z')
/ u% a* d9 q3 C, U% ?- ?/ \2 Cgrid on
pause(0.02)
8 s8 K8 @$ a2 v: y$ f& }8 e
3 l6 |- p  \; z/ ~, N%% 将正方体绕 y 轴旋转 60° (pi/3)
/ {4 O0 [! \; U  tfor alpha=linspace(0,pi/3,50)
5 E& t4 j3 G& ~( G% T    Ry=[cos(alpha),0,sin(alpha);0,1,0;-sin(alpha),0,cos(alpha)];   % 绕 y 轴旋转的变换矩阵
- j5 W& ^/ s) @* ~: l    W=Ry*V;                                                        % 执行绕 y 轴旋转的坐标变换, 得到新的坐标值
    set(h,'XData',W(1,: ),'YData',W(2,: ),'ZData',W(3,: ))            % 绘制绕 y 轴旋转之后的正方体
    pause(0.01)
end

%% 将正方体绕 z 轴旋转 180° (pi)
' z8 P# y# ]4 u4 s, E1 }* ]9 Lpause(0.2)
+ Z- j: k: k7 l- I/ P% \for beta=linspace(0,pi,80)
    Rz=[cos(beta),-sin(beta),0;sin(beta),cos(beta),0;0,0,1];       % 绕 z 轴旋转的变换矩阵
1 ]$ G1 q* S8 Q8 q* N) ?% J7 Z! H    U=Rz*W;                                                        % 执行绕 z 轴旋转的坐标变换, 得到新的坐标值
- m9 c# Z1 y& _7 ^; @    set(h,'XData',U(1,: ),'YData',U(2,: ),'ZData',U(3,: ))            % 绘制绕 z 轴旋转之后的正方体
    pause(0.02)
) W* X. u! q& _0 `5 t; I) t0 yend
$ U" @7 {/ C" Q  W
%% 将正方体绕 x 轴旋转 45° (pi/4)
pause(0.2)
9 c! t# w# p) k) `! [! Afor gamma=linspace(0,pi/4,30)
    Rx=[1,0,0;0,cos(gamma),-sin(gamma);0,sin(gamma),cos(gamma)];   % 绕 x 轴旋转的变换矩阵
% K5 r% @2 o1 l/ Z  ?    S=Rx*U;                                                        % 执行绕 x 轴旋转的坐标变换, 得到新的坐标值
    set(h,'XData',S(1,: ),'YData',S(2,: ),'ZData',S(3,: ))            % 绘制绕 x 轴旋转之后的正方体
    pause(0.02)
; O' D$ |( Z) qend

helendcany

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

Demyar

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