????function?[mouthlinemoutharea]=mouthfenge（grx）
????tempgrx=imread（‘1?（1）.bmp‘）;
????[mn]=size（tempgrx）;
????xx=tempgrx（:128-20:128+20）;
????xx（1:150:）=255;
????xx（210:256:）=255;
????mouaff=sum（xx2）;
????t=7;
????for?i=1:m??????????????????????????????%循環開始對水平積分投影曲線作平滑處理
????????if?i<=t????????????????????????????%前端邊界處理
????????????SM（i）=sum（mouaff（1:i+t））/（i+t）;
????????elseif?（i+t）>n?????????????????????%后端邊界處理
????????????SM（i）=sum（mouaff（i-t:n）/（n-i+t+1））;
????????else???????????????????????????????%整體曲線平滑處理
????????????SM（i）=sum（mouaff（i-t:i+t）/（2*t+1））;
????????end
????end
????[vmou]=min（SM）;
????mouthline=mou;
????
????moutharea=tempgrx（mou-20:mou+20128-35:128+35）;
%?????figureimshow（moutharea）;
????
????tempgrx（mou:）=0;???
?????figureimshow（tem

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

?????文件??????66614??2006-10-04?15:31??1.bmp

?????文件????????854??2010-12-06?21:16??mouth1.m

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

????????????????67468????????????????????2