imgdata=imread（[imgpathname?‘\‘?imgfilename]）;%??打開圖片
image（handles.axes1imgdata）;
handles.imgfilename=imgfilename;
handles.imgdata=imgdata;?
caitu=imread（‘timg.jfif‘）;
huitu=rgb2gray（caitu）;
yuantu=im2double（huitu）;
erzhi=im2bw（yuantugraythresh（yuantu））;
%消除噪點%經多次腐蝕膨脹操作目的是為平滑邊界
se=strel（‘disk‘10）;
erzhi=imopen（erzhise）;
%imshow（erzhi）
erzhi=imclose（erzhise）;
%提取彩色區域
erzhif=~erzhi;
erzhif=double（erzhif）;
caitud=double（caitu）;
caituz（::1）=caitud（::1）.*erzhif;
caituz（::2）=caitud（::2）.*erzhif;
caituz（::3）=caitud（::3）.*erzhif;
caituz=uint8（caituz）;
daxiao=size（caituz）;
caituhsv=rgb2hsv（caituz）;
huang=0;hong=0;
for?i=1:daxiao（1）
????for?j=1:daxiao（2）
????if?erzhi（ij1）==0&&（caituhsv（ij1）>=0.08&&caituhsv（ij1）<=0.24）
???????huang=huang+1;
????elseif?erzhi（ij1）==0&&（caituhsv（ij1）>=0.92||caituhsv（ij1）<=0.08）
????????hong=hong+1;
????end
????end
end


bianjie=edge（erzhi‘canny‘）;?????%采用Canny算子進行邊緣檢測
?%bianjie=edge（erzhi‘prewitt‘）;???%采用Prewitt算子進行邊緣檢測
%ferzhi=imcomplement（erzhi）;
tc=imfill（bianjie‘holes‘）;%填充白色
round_area?=?regionprops（tc‘Area‘）;%計算面積
girth?=?regionprops（tc‘Perimeter‘）;%計算周長
oval?=?regionprops（tc‘Eccentricity‘）;%計算離心率
juxing=regionprops（tc‘BoundingBox‘）;%計算外接矩形
jxmj=cat（1juxing.BoundingBox）;
area=cat（1round_area.Area）;
zhouc=cat（1girth.Perimeter）;
area=max（area）;
zhouc=max（zhouc）;
yuandu=4.*pi.*area/（zhouc.*zhouc）;
lixl=cat（1oval.Eccentricity）;

juxingdu=area/（jxmj（3）*jxmj（4））;
kuozhandu=min（jxmj（3）jxmj（4））/max（jxmj（3）jxmj（4））;
if?huang>hong
????if?yuandu<0.46
????zl=‘香蕉‘;
????else
????????zl=‘梨‘;
????end
elseif?yuandu>0.8
????????zl=‘蘋果‘;
else?
????zl=‘無法識別‘;
end



set（handles.edit1‘string‘zl）;

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

?????文件?????109436??2020-05-26?20:10??shuiguoshibie\1525429043-NoMySnkUCc.jpg

?????文件??????26862??2020-05-26?20:09??shuiguoshibie\60478190.jpg

?????文件??????61283??2020-05-26?15:22??shuiguoshibie\apple.jpg

?????文件???????8470??2020-05-22?15:40??shuiguoshibie\banana.jfif

?????文件???????8609??2020-05-26?13:57??shuiguoshibie\banana.jpg

?????文件???????1831??2020-06-06?20:19??shuiguoshibie\daima.m

?????文件???????1855??2020-06-06?20:49??shuiguoshibie\daimadaizhushi.m

?????文件???????7790??2020-05-26?13:36??shuiguoshibie\pear.jfif

?????文件???????6440??2020-05-22?15:45??shuiguoshibie\pear.jpg

?????文件??????30943??2020-05-26?20:12??shuiguoshibie\timg?（1）.jfif

?????文件???????6721??2020-05-26?20:13??shuiguoshibie\timg?（2）.jfif

?????文件??????10626??2020-05-26?20:04??shuiguoshibie\u=3251713856403797869&fm=26&gp=0.jpg

?????文件??????21957??2020-05-26?18:03??shuiguoshibie\untitled.fig

?????文件???????5922??2020-06-06?20:59??shuiguoshibie\untitled.m

?????文件???????6686??2020-05-26?17:29??shuiguoshibie\untitled1.m

?????文件???????1898??2020-06-09?23:07??shuiguoshibie\Untitled3.m

?????目錄??????????0??2020-12-06?21:18??shuiguoshibie

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

???????????????317329????????????????????17