%第二次數字圖像處理作業
%?第7組小組成員;熊健，夏辛，馬博，劉羽，朱潤生
%圖片讀入
?%img?=?imread（‘test1.png‘）;

%?img?=?imread（‘test2.jpg‘）;
%?img?=?rgb2gray（?img?）;

?img?=?imread（‘test2.jpg‘）;
?img?=?rgb2gray（?img?）;

imshow（img）;

%畫出直方圖
hist?=?imhist（img）;
figure?plot（hist）;

%圖片進行二值化
%?threshold?=?70;
?threshold?=?graythresh（?img?）*?255;
J=?imgimg（J）=0;
J=find（img>=threshold）;
img（J）=255;
figure?imshow（img）;

%?對圖片進行膨脹?test2
C=strel（‘square‘4）;
img?=?imdilate（img?C）;
figure?imshow（img）;

%進行圖片的腐蝕?test2
SE?=?strel（‘disk‘3）;
img?=?imerode（imgSE）;
figure?imshow（img）;

%?%進行圖片的腐蝕?test1
%?SE?=?strel（‘disk‘7）;
%?img?=?imerode（imgSE）;
%?figure?imshow（img）;


%把每個連通域進行編號
[LconDomainNum]?=?bwlabeln（img?4）;
%figure?imshow（L）;

%計算每個連通域的面積，把比較小的剔除掉
S?=?regionprops（L?‘Area‘）;
L?=?ismember（L?find（[S.Area]?>=?10））;

%重新計算去除面積比較小的連通域以后個數
[LconDomainNum]?=?bwlabeln（L?4）;

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

?????文件???????1042??2013-12-13?12:58??圖片分割matlab代碼\main?（2）.m

?????文件????????680??2013-12-05?20:33??圖片分割matlab代碼\main.m

?????文件??????71028??2013-12-02?19:32??圖片分割matlab代碼\pellets.png

?????文件??????71028??2013-12-02?19:32??圖片分割matlab代碼\test1.png

?????文件??????24856??2013-12-13?11:48??圖片分割matlab代碼\test2.jpg

?????文件??????30724??2013-12-13?10:38??圖片分割matlab代碼\test3.jpg

?????文件??????19573??2013-12-13?10:58??圖片分割matlab代碼\test4.jpg

?????目錄??????????0??2014-01-31?16:04??圖片分割matlab代碼

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

???????????????218931????????????????????8