转载！！
t=0:0.05:5; z=0:0.1:40; omiga=3/4*pi; beta=1;tao=1; for m=1:length(t) y=real(exp(1i*(omiga*t(m)+beta*z))+tao*exp(1i*(omiga*t(m)-beta*z))); cla;%从当前坐标区删除包含可见句柄的所有图形对象 hold on; %figure('color','black'); plot(y); set(gca, 'color', 'black'); ylim([-2,2]); frame=getframe(gcf);%以类似于截图的方式保存绘制过的图像 imind=frame2im(frame);%从单个影片帧 F 返回真彩色 (RGB) 图像 [imind,cm] = rgb2ind(imind,256);%将真彩色图像转化为索引图像 if(m==1) imwrite(imind,cm,'驻波.GIF','gif','Loopcount',inf,'DelayTime',0.01); else imwrite(imind,cm,'驻波.GIF','gif','WriteMode','append','DelayTime',0.01); end end