I=imread（‘TT.bmp‘）;
figureimshow（I）;
I1=I;
R=I（::1）;
G=I（::2）;
B=I（::3）;

J=roipoly（I）;%截取多邊形

J1=uint8（~J）*255;%取反并轉換成uint8型
R1=imsubtract（RJ1）;%所截圖像的R、G、B單獨顯示
G1=imsubtract（GJ1）;
B1=imsubtract（BJ1）;

J2=cat（3R1G1B1）;%合成截取圖像
S=imsubtract（IJ2）;%截取后的圖像

f=inline（‘uint8（ones（641）*mean（x））‘）;%處理公式

R2=colfilt（R1[8?8]‘distinct‘f）;%所截圖像的R、G、B單獨進行模糊
G2=colfilt（G1[8?8]‘distinct‘f）;
B2=colfilt（B1[8?8]‘distinct‘f）;
W=cat（3R2G2B2）;%合成所截圖像RGB形式

O=imadd（SW）;%處理后的圖像
figureimshow（O）;
figuresubplot（121）imshow（I1）;
subplot（122）imshow（O）;

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

?????文件?????991386??2008-04-24?16:49??TT.bmp

?????文件????????657??2008-04-28?20:11??nan.m

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

???????????????992043????????????????????2