发布网友 发布时间:2022-04-24 14:30
共3个回答
热心网友 时间:2022-05-04 20:21
clear
clc
%读图
database_path=uigetdir(cd,'素材库位置:');%获取素材库位置
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);
[imind,cm] = rgb2ind(im,256);
if i == 1;
imwrite(imind,cm,'dly','gif', 'Loopcount',inf);
else
imwrite(imind,cm,'dly','gif','WriteMode','append');
end
end
end
热心网友 时间:2022-05-04 21:39
用矩阵转换做
热心网友 时间:2022-05-04 23:14
简单