close?all;
clc;
clear?all;
?????FaceImg=imread（‘wangming150.jpg‘）;
?????I=FaceImg;
????%%%%%%%%%%%%%%%%%%%%%%%%%
??????I=rgb2ycbcr（I）;
??????Cb=I（::2）;%大小為mxn的二維矩陣
??????Cr=I（::3）;%大小為mxn的二維矩陣
??????CC=zeros（size（Cr））;
??????CC（（130%???????se=strel（‘square‘5）;???????%生成圓形結構元素
%???????BW=imerode（CCse）;????????%用生成的結構元素對圖像進行腐蝕
??????se=strel（‘disk‘8）;
??????BW=imclose（CCse）;?
??????BW=imfill（BW‘holes‘）;
??????[L?num]?=?bwlabel（BW?4）;?%?區域標記
??????S?=?regionprops（L‘Area‘‘BoundingBox‘）;
??????Sarea?=?cat（1?S.Area）;
????
??????Bd?=?cat（1?S.BoundingBox）;
??????[maxarea?n]=max（Sarea）;
???????bw=（L==n）;
??????%%%%%%%%%%%%%%%%%%%%
??????[bdn?bdm]=size（Bd）;
????
??????zx=floor（Bd（n1））;
??????zy=floor（Bd（n2））;
??????zw=floor（Bd（n3））;
??????zh=floor（min（Bd（n3）（Bd（n4）*1.2）））;??
??????xw=0;
??????xh=0;
??????eh=0;
??????%%%求矩形左上角起點的y和高度。
??????while?xw<（zw/2）
??????????xw=length（find（bw（zy:）））;%二值圖像行中有圖像素數量
??????????zy=zy+3;
??????????zh=zh-3;
??????end
??????yb1=zy+5;
??????yb2=yb1+zh-5;
??????%%%%求矩形左上角的起點x坐標
??????while?xh<（zh/2）
??????????xh=length（find（bw（:zx）））;%二值圖像一個列上的像素點數量
??????????zx=zx+3;
??????????zw=zw-3;
??????end
??????xb1=zx+10;
??????xb2=zx+zw;
??????%求圖像右側結束位置的的x軸坐標
??????while?eh<（zh/2）
??????????eh=length（find（bw（:（xb2））））;
??????????xb2=xb2-3;
??????end
??????xb2=xb2-10;
??????zbiao=[xb1yb1（xb2-xb1）（yb2-yb1）];
??????fprintf（‘矩形坐標=%d%d%d%d\n‘xb1xb2yb1yb2）;
??????
??????imshow（bw）;
??????rectangle（‘Position‘zbiao?‘EdgeColor‘?‘r‘）;
??????
??????ImR=FaceImg（yb1:yb2xb1:xb21）;
??????ImG=FaceImg（yb1:yb2xb1:xb22）;
??????ImB=FaceImg（yb1:yb2xb1:xb23）;
??????Imrgb=FaceImg（yb1:yb2xb1:xb2:）;

??????RIMG=mean（ImR（:））;
??????GIMG=mean（ImG（:））;
??????BIMG=mean（ImB（:））;
?????
??????rgbimg（:imnum）=[RIMG;GIMG;BIMG];
??????disp（[‘圖片處理時間：‘num2str（toc）]）;
???
??????fprintf（‘圖像%d的均值：（%d%d%d）;\n‘imnumRIMGGIMGBIMG）;

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

?????文件???????2101??2013-10-21?19:05??newfigure\facetest.m

?????文件??????11573??2013-10-21?10:38??newfigure\heartbreat.fig

?????文件??????15082??2013-10-21?10:38??newfigure\heartbreat.m

?????文件?????????70??2013-10-17?18:23??newfigure\StartFcn.m

?????文件????????235??2013-10-17?18:21??newfigure\timerdamo.m

?????目錄??????????0??2013-10-24?09:37??newfigure

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

????????????????29061????????????????????6