首页 > 代码库 > MATLAB中绘制质点轨迹动图并保存成GIF
MATLAB中绘制质点轨迹动图并保存成GIF
工作需要在MATLAB中绘制质点轨迹并保存成GIF以便展示。
绘制质点轨迹动图可用comet和comet3命令,使用例子如下:
t = 0:.01:2*pi;
x = cos(2*t).*(cos(t).^2);
y = sin(2*t).*(sin(t).^2);
z = t;
comet(x,y,0.1); %绘制二维
%comet3(x,y,z,0.1); %绘制三维
这有一个问题在于comet或comet3无法控制绘制的动画的速度,为了实现这一点,一个可行的方法是重写comet和comet3,在每一个for循环中增加:
pause(interval)
其中interval可以是用户输入的每帧的时间间隔。
为了实现一边绘制动图,一边保存成GIF动画,我的实现方法是重写comet和comet3,具体如下:
在每个for循环的末尾增加:
frame = getframe(gcf);
im = frame2im(frame);
[imind,cm] = rgb2ind(im,256);
if GifImCount == 1;
imwrite(imind,cm,filename,‘gif‘,‘DelayTime‘,interval, ‘Loopcount‘,inf);
else
imwrite(imind,cm,filename,‘gif‘,‘DelayTime‘,interval, ‘WriteMode‘,‘append‘);
end
GifImCount = GifImCount + 1;
其中GifImCount在程序初始设为0,filename为要存储的gif文件的名称。原先for循环中的drawnow语句可以去掉,因为getframe本身就会调用drawnow函数。
但是这样有一个问题,就是这样只能获取当前帧的动画,尾迹消失了,即无法得到连续的动画效果。这个问题我初始想肯定是getframe里面某处擦除了图形,可以通过修改getframe来解决,但是还是没有解决。最后找到一个权宜之计,那就是重写comet和comet3函数时,不进行原先的body和tail的分别绘制,将comet和comet3中的“% Grow the body”和“% Clean up the tail”两部分去掉,只留“% Primary loop”部分,并稍做如下修改:
% Primary loop
for i = 1:m
set(head,‘xdata‘,x(i),‘ydata‘,y(i))
set(tail,‘xdata‘,x(1:i),‘ydata‘,y(1:i))
frame = getframe(gcf);
im = frame2im(frame);
[imind,cm] = rgb2ind(im,256);
if GifImCount == 1;
imwrite(imind,cm,filename,‘gif‘,‘DelayTime‘,interval, ‘Loopcount‘,inf);
else
imwrite(imind,cm,filename,‘gif‘,‘DelayTime‘,interval, ‘WriteMode‘,‘append‘);
end
GifImCount = GifImCount + 1;
end
大意是每次绘制都重绘从1到i的点。通过以上的修改,大致能够实现在MATLAB中绘制质点轨迹动图并保存成GIF的效果。
下面是效果:
如果你有更好的方法,请告知我,谢谢!
MATLAB中绘制质点轨迹动图并保存成GIF