基于Matlab绘制无限循环的GIF动图（源码+图片）.rar

%% 定义三维曲面网格点的横坐标 & 纵坐标 clear;clc;close all [x,y]=meshgrid(-8:0.1:8); %% 设定 k 为变量, 绘制在不同 k 值下的三维曲面图, 依次保存到 gif 动图里 for k=1:10 f=@(x,y)(sin(sqrt((11-k)*(x.^2+y.^2)))./sqrt((11-k)*(x.^2+y.^2)+eps)); % 曲面函数 z=f(x,y); % 计算 (x, y) 所对应的 z 坐标值 surf(x,y,z) % 绘制三维曲面 shading interp % 设定三维曲面的显示效果 pause(0.1) M=getframe(gcf); % 捕捉当前绘图窗口, 作为动图的一帧图像 if k==1 % 判断是否为首帧图像 [I,map]=rgb2ind(M.cdata,256); % 将 RGB 图像转换为索引图像 imwrite(I,map,'out.gif','DelayTime',0.1,'LoopCount',Inf) % 创建 gif 动图, 写入首帧图像, 设定动图无限循环, 延时时间为 0.1 秒 else [I,map]=rgb2ind(M.cdata,256); % 将 RGB 图像转换为索引图像 imwrite(I,map,'out.gif','WriteMode','append','DelayTime',0.1) % 添加到 gif 图像, 设定延时时间为 0.1 秒 end end