1、首先打开电脑上的“matlab”软件,此处以下图中的代码为例,绘制出一个三维图像。meshgrid函数用于生成网格点。可以使用自己喜欢的例子来制作动画。
2、下面点击回车键,代码运行后,绘制出的三维图像。
3、输入命令theAxes=axis;在工作区可以看到theAxes=[0,50,0,60,-0.5,1],是surf函数生成的。
4、使用命令fmat=moviein(20);把fmat保存为一个moviein结构体,括号里的20表示动画有20帧。
5、接着使用循环结构分别画每一帧的图像,此处surf函数分20份来画,坐标轴统一为之前的保存的坐标轴,把moviein结构体fmat的取为getframe。
6、下面在命令行窗口输入movie(fmat,10);就可以开始放映动画。
7、在绘图窗口即可看到运行结果,可以看到原来的静态图像变为动画了。
注意事项:
MATLAB的基本数据单位是矩阵,它的指令表达式与数学、工程中常用的形式十分相似,故用MATLAB来解算问题要比用C,FORTRAN等语言完成相同的事情简捷得多。
通常动画可以用视频avi格式导出,也可以导出为gif.
基本流程是在动画循环中,将每个动画图画加入到avi文件中或写入GIF89a格式的Gif文件中.
close all; clear all;
%创建avi文件对象
aviobj = avifile('test.avi','compression','None');
%动画部分代码
t = linspace(0,2.5*pi,40);
fact = 10*sin(t);
fig=figure;
[x,y,z] = peaks;
for k=1:length(fact)
h = surf(x,y,fact(k)*z);
axis([-3 3 -3 3 -80 80])
axis off
caxis([-90 90])
%获取当前画面
F = getframe(fig);
%加入avi对象中
aviobj = addframe(aviobj,F);
%转成gif图片,只能用256色
im = frame2im(F);
[I,map] = rgb2ind(im,256);
%写入 GIF89a 格式文件
if k == 1;
imwrite(I,map,'test.gif','GIF', 'Loopcount',inf,'DelayTime',0.1);
else
imwrite(I,map,'test.gif','GIF','WriteMode','append','DelayTime',0.1);
end
end
close(fig);
%关闭avi对象
aviobj = close(aviobj);
通常动画可以用视频avi格式导出,也可以导出为gif.
基本流程是在动画循环中,将每个动画图画加入到avi文件中或写入GIF89a格式的Gif文件中.
close all; clear all;
%创建avi文件对象
aviobj = avifile('test.avi','compression','None');
%动画部分代码
t = linspace(0,2.5*pi,40);
fact = 10*sin(t);
fig=figure;
[x,y,z] = peaks;
for k=1:length(fact)
h = surf(x,y,fact(k)*z);
axis([-3 3 -3 3 -80 80])
axis off
caxis([-90 90])
%获取当前画面
F = getframe(fig);
%加入avi对象中
aviobj = addframe(aviobj,F);
%转成gif图片,只能用256色
im = frame2im(F);
[I,map] = rgb2ind(im,256);
%写入 GIF89a 格式文件
if k == 1;
imwrite(I,map,'test.gif','GIF', 'Loopcount',inf,'DelayTime',0.1);
else
imwrite(I,map,'test.gif','GIF','WriteMode','append','DelayTime',0.1);
end
end
close(fig);
%关闭avi对象
aviobj = close(aviobj);
你看看下面这个例子可不可以模仿,两种格式。一种是jpg图片,一种是avi视频
clear;clc;
[x,y]=meshgrid(-8:.1:8);
for j=1:10
f=@(x,y)(sin(sqrt((11-j)*(x.^2+y.^2)))./sqrt((11-j)*(x.^2+y.^2)+eps));
z=f(x,y);
surf(x,y,z);shading interp;
M(j) = getframe;
if j==1
[I,map]=rgb2ind(M(j).cdata,256);
imwrite(I,map,'out.gif','DelayTime',.1)
else
imwrite(rgb2ind(M(j).cdata,map),map,'out.gif','WriteMode','append','DelayTime',.1)
end
end
movie2avi(M,'out.avi')