exm060433_1.m

来自「MATLAB 6.5 从基础讲解其功能」· M 代码 · 共 10 行

clf;shg,x=3*pi*(-1:0.05:1);y=x;[X,Y]=meshgrid(x,y);
R=sqrt(X.^2+Y.^2)+eps;	Z=sin(R)./R;
h=surf(X,Y,Z);colormap(jet);axis off
n=12;mmm=moviein(n);			%预设画面矩阵。新版完全可以取消此指令 。
for i=1:n
	rotate(h,[0 0 1],25);		%是图形绕z轴旋转25度/每次
	mmm(:,i)=getframe;			%捕获画面。新版改为mmm(i)=getframe 。
end
movie(mmm,5,10)					%以每秒10帧速度，重复播放5次。