clear all;
%读图
database_path=uigetdir('D:\MATLAB\2D 仿真结果');%获取素材库位置
TrainFiles = dir(database_path);
Train_Number = 0;
for i = 1:size(TrainFiles,1)
if not(strcmp(TrainFiles(i).name,'.')|strcmp(TrainFiles(i).name,'..')|strcmp(TrainFiles(i).name,'Thumbs.db'))
%%处理异常的文件,.是本级目录,..是上一级目录,Thums.db是系统存有图片时的缩略图文件
Train_Number = Train_Number + 1; % Number of all images in the training database
end
end
%制作
if Train_Number==0
msgbox('素材库位置为空','读取失败');
else
% T=[];
for i = 1 : Train_Number %%把该文件夹里的所有图片都放到了T里啊,每个图片是按列存进了T里
%str = strcat(database_path,'\',TrainFiles(i+2).name);
%im = imread(str);
%frame = getframe;
%im = frame2im(frame);
%[imind,cm] = rgb2ind(im,256);
Img=imread(['D:\MATLAB\2D 仿真结果\output',num2str(i) '.bmp']);
imshow(Img)
frame=getframe(gcf);
im=frame2im(frame);%制作gif文件,图像必须是index索引图像
[imind,cm]=rgb2ind(im,256);
%imwrite(I,map,'output.gif','gif','DelayTime',0.1,'WriteMode','append',inf);
if i == 1;
imwrite(imind,cm,'2D wave propagation 动态演示','gif','DelayTime',0.3, 'Loopcount',inf);
else
imwrite(imind,cm,'2D wave propagation 动态演示','gif','DelayTime',0.3,'WriteMode','append');
end
end
end
AnimatedGif.rar_matlab动态图片_matlab生成 GIF
版权申诉
170 浏览量
2022-07-14
21:45:27
上传
评论
收藏 846B RAR 举报
weixin_42653672
- 粉丝: 93
- 资源: 1万+
评论0