%輸入源樣本?為不同的表情
clear?all
for?pcolum=1:23?????????????%從1到23進行循環
????p1=ones（3030）;?????????%建立全為30*30且初始值為1的樣本矩陣
????m=strcat（‘D:\MATLAB\work\face\‘int2str（pcolum）‘.bmp‘）;
????I=imread（m）;???????????%循環讀入樣本文件
????I1=im2bw（I0.3）;???????%對輸入圖像進行二值化處理將256級轉換為2級?采用全局閾值0.3，對輸入圖像進行二值化處理?采用全局閾值0.3，im2bw為二值化處理函數，處理后的結果是0-1之間的值
????%imshow（I1）;
???[mn]=find（I1==0）;??????%I1為0的坐標0代表黑點。1代表白點。就是找尋黑點的橫縱最大和最小的坐標點
???rowmin=min（m）;
???rowmax=max（m）;
???colummin=min（n）;
???colummax=max（n）;
???I2=I1（rowmin:rowmaxcolummin:colummax）;??%截取是入圖像中的臉部分
???%imshow（I2）;%顯示截取后的樣本
???rate=30/max（size（I2））;?
???I3=imresize（I2rate）;??%對輸入文件變尺寸處理
???%imshow（I3）;
???
???
???[ij]=size（I3）;
???row=round（（30-i）/2）;
???colum=round（（30-j）/2）;
???p1（row+1:row+icolum+1:colum+j）=I3;??%建立起30*30的矩陣
???p1=-1*p1+ones（3030）;??????????????%反色處理

??for?hh=1:30
???p（（hh-1）*30+1:（hh-1）*30+30pcolum+1）=p1（hh1:30）;
??end??????????????????????%將處理的源樣本輸入供神經網絡訓練的樣本???pcolum是樣本數循環變量

??switch?pcolum
????case?{12345678?910111213}
????????t（pcolum+1）=1????%笑
????case{20212223}
????????t（pcolum+1）=2????%囧
??????case{141516171819}
????????t（pcolum+1）=3????%怒
????
??end????????????????????%建立與訓練樣本對應的輸出值t
end
save?51ET?p?t;


????????
????????
???????
????????????????
????????
????????
????????

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

?????文件?????387350??2009-05-19?13:02??ET51net.mat

?????文件???????1560??2009-05-19?13:04??jianliyangben.m

?????文件???????1569??2009-05-18?23:15??jianliyangben.asv

?????文件????????598??2009-05-19?13:01??trainNet.m

?????文件???????1327??2009-05-19?12:37??tryout.m

?????文件???????1326??2009-05-19?00:06??backNet\51ET.mat

?????文件?????387350??2009-05-19?00:32??backNet\ET51net.mat

?????文件??????93762??2009-05-17?00:03??face\1.bmp

?????文件??????93762??2009-05-18?15:07??face\10.bmp

?????文件??????93762??2009-05-17?00:10??face\11.bmp

?????文件??????93762??2009-05-17?00:11??face\12.bmp

?????文件?????274566??2009-05-18?15:46??face\13.bmp

?????文件??????93762??2009-05-18?15:03??face\14.bmp

?????文件??????93762??2009-05-18?15:04??face\15.bmp

?????文件??????93762??2009-05-18?15:05??face\16.bmp

?????文件??????93762??2009-05-18?15:06??face\17.bmp

?????文件?????147254??2009-05-18?15:46??face\18.bmp

?????文件??????93762??2009-05-17?00:12??face\19.bmp

?????文件??????93762??2009-05-17?01:20??face\2.bmp

?????文件??????93762??2009-05-17?00:01??face\20.bmp

?????文件??????93762??2009-05-17?01:33??face\21.bmp

?????文件??????93762??2009-05-18?15:08??face\22.bmp

?????文件??????93762??2009-05-17?01:37??face\23.bmp

?????文件??????93762??2009-05-17?01:21??face\3.bmp

?????文件??????93762??2009-05-17?01:22??face\4.bmp

?????文件??????93762??2009-05-17?01:22??face\5.bmp

?????文件??????93762??2009-05-18?14:58??face\6.bmp

?????文件??????93762??2009-05-17?01:27??face\7.bmp

?????文件??????93762??2009-05-17?01:30??face\8.bmp

?????文件??????93762??2009-05-18?15:06??face\9.bmp

............此處省略19個文件信息