MATLAB源程序代码分享：MATLAB实现组对象的整体几何变换

House

MATLAB源程序代码分享：MATLAB实现组对象的整体几何变换
( w; r1 G" X3 o" _( S" f4 j- u4 g

$ c& a+ A6 P: r# d: c" J2 {* L& K%% 绘制两个三维曲面
clear;clc;close all
! l& H% \. G1 D8 W+ yx=-2:0.2:2;              % 定义 x 的范围
y=-2:0.2:2;              % 定义 y 的范围
: t0 f9 [6 ?0 ^  ][xx,yy]=meshgrid(x,y);   % xy 平面的网格化处理
! l/ m3 k$ `, N6 v+ T( ]
zz1=xx.^2+yy.^2+1;       % 计算第一个曲面的 z 坐标
zz2=-xx.^2-yy.^2-1;      % 计算第二个曲面的 z 坐标

figure
" _7 C( K' z1 B$ O& A; f1 i* ]# B9 G% C1 dset(gcf,'units','normalized','position',[0.2 0.2 0.6 0.6]);  % 设置 figure 窗口的位置和尺寸
h1=suRF(xx,yy,zz1);
hold on
6 f! h; O2 H1 s! I& Oh2=surf(xx,yy,zz2);
$ @/ m- r7 E! X9 J: o- g
%% 绘制一个三维螺旋线
t=-12:0.05:12;
* K4 I! m2 p/ }6 t2 F$ Hxk=6*cos(3*t);
yk=6*sin(3*t);
zk=0.5*t;
' d$ g" }% }: Q8 g1 ^h3=plot3(xk,yk,zk,'--xr');

%% 设置坐标系的属性
+ S0 ?* _9 Z1 C! `- s% n& oaxis equal
set(gca,'XLim',[-10 10])
set(gca,'YLim',[-10 10])
set(gca,'ZLim',[-10 10])
xlabel('x 轴')
: u7 x1 {9 x6 j$ Vylabel('y 轴')
- s: S' D( T: [3 N3 Z- j4 gzlabel('z 轴')

7 X, T8 \  {' o; k! D%% 将三维曲面和三维螺旋线, 添加到同一个几何变换组里
% N" C& r: Y! @  ]7 ~3 I# y0 Gt=hgtransform;         % 创建一个几何变换组 t
set(h1,'Parent',t)     % 将曲面句柄 h1 的父对象, 设置为 t (将 h1 添加到几何变换组 t 里)
set(h2,'Parent',t)     % 将曲面句柄 h2 的父对象, 设置为 t (将 h2 添加到几何变换组 t 里)
1 t* d. P) f* Y* u! aset(h3,'Parent',t)     % 将三维螺旋线句柄 h3 的父对象, 设置为 t (将 h3 添加到几何变换组 t 里)

%% 对整个几何变换组, 实施绕 x 轴旋转的操作
4 f# @3 L: `5 t! y% e0 f3 a& A1 Vfor rx_angle=0:0.1:2.7*pi
    Rx=makehgtform('xrotate',rx_angle);    % 求出绕 x 轴旋转的变换矩阵
    set(t,'Matrix',Rx)                     % 使用变换矩阵, 对几何变换组 t 实施整体绕 x 轴的旋转操作
    pause(0.05)
. f- m% C" H% J" xend

helendcany

MATLAB实现组对象的整体几何变换。

其旧如之何

MATLAB实现组对象的整体几何变换。
* g9 n: Y4 z. v% |