RGB?=?imread（‘coin.jpg‘）;
imshow（RGB）;
hold?on
I?=?rgb2gray（RGB）;
threshold?=?graythresh（I）;
bw?=?im2bw（Ithreshold）;
figure;
imshow（bw）
bw?=?bwareaopen（bw10）;
se?=?strel（‘disk‘2）;
figure;
bw?=?imclose（bwse）;
bw?=?imfill（bw‘holes‘）;
imshow（bw）;
[L?num]=bwlabel（bw4）;
s=zeros（num1）;
for?i=1:num
????s（i）=sum（sum（L==i））;?%計算每個連通區域的面積
end
[B?IX]=sort（s‘descend‘）;?%面積從大到小排序
BWout=and（bwL==IX（1））;?%刪除區域（除了面積最大的區域）
[n?m]?=?size（I）;
for?ii?=?1:n
????for?jj?=?1:m
????????if（BWout（iijj）==0）
????????????RGB（iijj1）=0;
????????????RGB（iijj2）=0;
????????????RGB（iijj3）=0;
????????end
????end
end
figure;
imshow（RGB）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????52532??2016-05-19?18:54??coin.jpg
?????文件?????????688??2016-05-19?19:35??Untitled1.m