学习用matlab制作GIF动画（png转gif）

pulbieup

目标：将三幅图（png格式）制作成GIF

准备材料：三幅png格式的图
: O7 r" B: m! [7 y5 a, l6 Z4 F


  @0 }5 O, f. ]& h! egif展现一个动态由悲到喜的过程
3 |: \9 I* R5 T& n  o8 [( o4 K+ Q, K
实现代码：
" x: ?: X! w% w( d9 x
5 s6 C2 N1 O+ X+ C6 D`%预定义变量
  S$ n# A, ^9 e% k8 F+ Q) Q  @$ ?6 VPicture_save = {0};                                                        
%初始化提高效率
filename = 'myGIF.gif';

0 r5 b4 `( T2 q5 E3 Y7 C
%图像获取，图像类型转换
7 A. \7 T# v: d8 K6 }; n[P1, map]  = imread('1.png');     
picture1 = ind2rgb(P1,map);                                                
%索引图必须转换为真彩图,否则颜色不对
7 a" J0 f9 C: s. v9 |6 p8 H[P2, map]  = imread('2.png');
picture2 = ind2rgb(P2,map);
[P3, map]  = imread('3.png');
2 |8 _# s6 }' S) v4 |picture3 = ind2rgb(P3,map);
! w. N2 d' q9 n; j; \5 B
array = [{picture1}, {picture2} ,{picture3}];                              
9 w& z- N# e. L* V( O%方便循环  
% u' B! [% R, \7 o9 n
8 u) _3 }8 f9 ~%保留帧数据
for idx = 1:3
+ C& q5 f1 a& p    figure(idx)
7 C+ x: N% D5 O9 w# H5 B. P0 Q    imshow(array{idx});                                                   
    %索引图转换为真彩图 ，{}访问数组里面的类型 （）访问元胞类型     
4 T; l% P3 A: T  J/ Z    Picture_save{idx} = frame2im(getframe(idx));                           
0 f9 ^6 R- i. o: B- ]# a    %获取figure（idx）展示的效果，将其以图片数据保存
# `3 G, b0 n2 d9 W    close all
end

%制作GIF
# c$ l. [+ n1 \%有个bug 在第一次播放的时候没有中间的那一帧，之后又有了
for idx = 1:3
    [A,map] = rgb2ind(Picture_save{idx},256);                              
    %imwrite不能显示三维图像，所以要进行转换
' S1 u* O! y2 K" Y    if idx == 1
" E% I  k. D2 n4 ~7 B        imwrite(A,map,filename,'gif','LoopCount',Inf,'DelayTime',0.5);   
         %Inf 无限循环
3 m* R6 A* ~5 B, g    else
        imwrite(A,map,filename,'gif','WriteMode','append','DelayTime',0.5);
7 e* m' M$ b. N+ ?0 |    end
end

  c! g8 y: i* |* |1 S' @5 ]close all`


以下是代码的截图
4 P% p; v& k  E


当然了，还有更简单的办法：

for idx = 1:3
    [A,map] = imread(strcat(num2str(idx),'.PNG'));                              %imwrite不能显示三维图像，所以要进行转换
    if idx == 1
7 k0 M+ w  M7 n& Y7 r        imwrite(A,map,'new.gif','LoopCount',Inf,'DelayTime',0.5);               %Inf 无限循环
    else
( v6 S5 w9 d- e( t        imwrite(A,map,'new.gif','WriteMode','append','DelayTime',0.8);
    end
end
+ n$ X8 o6 i7 i( \& b& g( L" T

& K1 n, Q- U5 C2 P) p4 c$ z; @关于代码有遇到别的问题，或者有改进意见，欢迎评论。
3 P/ Y. W: J9 V) ]# |; ^/ v! K
在实现过程中我也遇到了很多问题，有些注释在代码中，有些遗漏了，希望可以在讨论中得到补充。
' Q3 F/ f  a- k8 @

5 l# F+ d  i0 ~7 M6 Q& l0 `
4 }8 I7 H# s1 e( G
- W+ i( m, ^& K7 h8 p- g- ^' f) d5 \

yin123

用matlab制作GIF动画