寻找最大连通域，批处理，所有的照片，求指标（周长、面积、离心率、长轴、短轴），目标颜色是白色

by：黄光耀
clc;
close all;
clear all;

path = ‘C:\Users\1\Desktop\1’;
OutputDir = ‘C:\Users\1\Desktop\6’;
tnum = 5;

%%%%定义csv格式，
filename1 = ‘1.csv’;
fid1 = fopen(filename1,‘w’);
% fid2 = fopen(filename1, ‘w’);

h1 = ‘序号,’;
h2 = ‘round_area（面积）,’;
h3 = ‘s.Perimeter（周长）,’;
h4 = ‘oval.Eccentricity（离心率）,’;
h5 = ‘rectangular.MajorAxisLength(长轴长度),’;

fprintf(fid1, [’%s’,’%s’, ‘%s’, ‘%s’, ‘%s’, ‘\n’], h1, h2, h3, h4, h5);

w = 1:5;

for a=1:1:5
fprintf(fid1,’%d\n’,w(a));
% fprintf(w(a));
end

% w = 1:5;
% for a=1:1:5
% fprintf(fid1,’%d\n’,w(a));
% % fprintf(w(a));
%
%
%
% end

for i = 2:1:tnum
fname = [path,‘003-’,int2str(i),’.png’];
img = imread(fname);

   % get binary image
gray_img = rgb2gray(img);
T = graythresh(gray_img);
bw_img = im2bw(gray_img, T);

% find the largest connected region
img_reg = regionprops(bw_img,  'ar