%---------3?圖像分割與分析--------------%
clear?all;
clc;
I=imread（‘c.jpg‘）;
subplot（231）imshow（I）;
t=graythresh（I）;
bw=im2bw（It）;
subplot（232）?imshow（bw）;
g=imfill（bw‘holes‘）;
subplot（233）?imshow（g）;
sumarea=sum（sum（g））;
str0=sprintf（[‘圖像總面積為:‘num2str（sumarea）]）??;
text（150str0‘FontSize‘18‘Color‘‘y‘）;
%----------------第一個區域----------------------------%
[LN]?=?bwlabel（g4）;?%?標注二進制圖像中已連接的部分
X=1;%默認圖像中只有一個連同區域.
[i?j]=find（L==X）;%將標注的區域放到一個數組中.
bwi=bwselect（Lij4）;
p=bwperim（bwi）;
perm=sum（sum（p））;%周長
area=size（i）;%面積標注區域像素點數就為物體面積.
str1=sprintf（[‘圖像目標一面積為:‘num2str（area（1））]）;
text（150str1‘FontSize‘18‘Color‘‘y‘）;
str2=sprintf（[‘圖像目標一周長為:‘num2str（perm）]）;
text（1100str2‘FontSize‘18‘Color‘‘y‘）;
[mn]=size（g）;
A=zeros（mn）;
for?k=1:area;
?

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????3105??2012-01-05?10:11??長寬比_面積_周長\mianji.asv

?????文件???????3110??2012-01-05?10:12??長寬比_面積_周長\mianji.m

?????目錄??????????0??2012-02-29?15:08??長寬比_面積_周長

-----------?---------??----------?-----??----

?????????????????6215????????????????????3