批量图片转换成矩阵matlab

%%eg. bmp_to_mat('UCSDped1\Test\Test003_gt\' ,'mat3.mat');
function bmp_to_mat(bmp_file,mat_name)
tnum=200;%200张图片

files = dir(fullfile(bmp_file,'*.bmp'));
for i = 1:tnum
    img = imread(strcat(bmp_file,files(i).name)); 
    I = im2double(img);
    mat(:,i).val = I; 
end
D = cell2mat(struct2cell(mat));
Mat = reshape(D,158,238*tnum);%将200张图片合为一个矩阵
save(mat_name,'Mat');
end