Matlab制作GIF动图

目的：利用Matlab制作GIF动图。

• 结果图

•  测试代码

clear;clc;
filename = '页岩碎屑.gif';  % 保存文件名
Iters = [1:9 10*(1:9) 100*(1:9) 1000*(1:9) 10000*(1:9) 100000*(1:10)];
for i = 1:length(Iters)
    str = [cd '\页岩碎屑\页岩碎屑' num2str(Iters(i)) '.png'];  % 图片的绝对或相对路径
    Img = imread(str);
    Img = imresize(Img, [600, 800]);
    imshow(Img);
    set(gcf, 'visible', 'off');     % 不显示窗口
    q = get(gca,'position');
    q(1) = 0;%设置左边距离值为零
    q(2) = 0;%设置右边距离值为零
    set(gca, 'position',q);
    frame = getframe(gcf, [0, 0, 800, 600]);%
    im = frame2im(frame); %制作gif文件，图像必须是index索引图像
    imshow(im);
    [I, map] = rgb2ind(im, 256);
    if i == 1;
        imwrite(I, map, filename, 'gif', 'Loopcount', inf, 'DelayTime', 0.3);
    else
        imwrite(I, map, filename, 'gif', 'WriteMode', 'append', 'DelayTime', 0.3);
    end
end