个人笔记-MATLAB生成gif

最新推荐文章于 2024-07-16 12:22:44 发布

pdc31czy

最新推荐文章于 2024-07-16 12:22:44 发布

阅读量130

点赞数 3

分类专栏：个人笔记 MATLAB 文章标签：笔记 matlab

本文链接：https://blog.csdn.net/pdc31czy/article/details/139451737

版权

个人笔记同时被 2 个专栏收录

15 篇文章 3 订阅

订阅专栏

MATLAB

6 篇文章 1 订阅

订阅专栏

FAI_s是解

test_movie.m

M = moviein(300);
    t=1;
for n=1:20:6000
    figure(t);
    %patch('Faces',mesh1.Elements,'Vertices',mesh1.Nodes,'FaceVertexCData',FAI_s(:,n),'FaceColor','interp');
    FAI=reshape(FAI_s(:,n),129,257);
    surface(FAI)
    axis off
    axis equal
    shading interp
    M(:,t)=getframe;
    t=t+1;
end

savegif.m

pic_num = 1;
for n = 1:1:300
%     set(figure(n),'Position',[200,500,500,70]);
%     FAI=reshape(FAI_s(:,n),31,201);
%     FAI2=flipud(FAI);
%     FAII=[FAI2;FAI];
%     surface(FAII)
%     axis off
%     shading interp
%     M=getframe(gcf);
    I=frame2im(M(n));
    [I,map]=rgb2ind(I,256);
    if pic_num == 1
        imwrite(I,map,'MCL_CH1.gif','gif', 'Loopcount',inf,'DelayTime',0.05);
    else
        imwrite(I,map,'MCL_CH1.gif','gif','WriteMode','append','DelayTime',0.05);
    end
    pic_num = pic_num + 1;
end

或者

test_movie.m

M = moviein(600);
    t=1;
for n=1:10:6000
    figure(t);
    %patch('Faces',mesh1.Elements,'Vertices',mesh1.Nodes,'FaceVertexCData',FAI_s(:,n),'FaceColor','interp');
    FAI=reshape(FAI_s(:,n),129,257);
    surface(FAI)
    axis off
    axis equal
    shading interp
    M(:,t)=getframe;
    t=t+1;
end

savegif.m

pic_num = 1;
for n = 1:1:600
%     set(figure(n),'Position',[200,500,500,70]);
%     FAI=reshape(FAI_s(:,n),31,201);
%     FAI2=flipud(FAI);
%     FAII=[FAI2;FAI];
%     surface(FAII)
%     axis off
%     shading interp
%     M=getframe(gcf);
    I=frame2im(M(n));
    [I,map]=rgb2ind(I,256);
    if pic_num == 1
        imwrite(I,map,'MCL_CH1.gif','gif', 'Loopcount',inf,'DelayTime',0.05);
    else
        imwrite(I,map,'MCL_CH1.gif','gif','WriteMode','append','DelayTime',0.05);
    end
    pic_num = pic_num + 1;
end

先跑test_movie.m，后跑savegif.m。