批量处理图像并保存

clear all;
close all
clc
file=dir(‘C:\Users\Administrator\Desktop\处理前\*.jpg‘);
for i=1:length(file)
     I=imread([‘C:\Users\Administrator\Desktop\处理前\‘,file(i).name]);
     I_Gray=rgb2gray(I);
     I_Bw=im2bw(I,graythresh(I));
     I_R=I(:,:,1);
     I_G=I(:,:,2);
     I_B=I(:,:,3);
     %R-B
     I_RB=I_R-I_B;
     I_Bw2=im2bw(I_RB,graythresh(I_RB));
     I_Bw2Fill=imfill(I_Bw2,‘holes‘);
     I_R1=uint8(I_Bw2Fill).*I_R;
     I_G1=uint8(I_Bw2Fill).*I_G;
     I_B1=uint8(I_Bw2Fill).*I_B;
     I_Final=cat(3,I_R1,I_G1,I_B1);
     imwrite(I_Final,[‘C:\Users\Administrator\Desktop\处理后\‘,file(i).name,‘.jpg‘]);
end