function?main（k）
%?ORL?人臉數據集的主成分分析
%
%?輸入：k?---?降至?k?維

%?定義圖像高、寬的全局變量?imgRow?和?imgCol，它們在?ReadFaces?中被賦值
global?imgRow;
global?imgCol;

%?讀入每個人的前5副圖像
nPerson=40;
nFacesPerPerson?=?5;
display（‘讀入人臉數據...‘）;
[imgRowimgColFaceContainerfaceLabel]=ReadFaces（nFacesPerPersonnPerson）;
display（‘..............................‘）;


nFaces=size（FaceContainer1）;%樣本（人臉）數目
display（‘PCA降維...‘）;
%?LowDimFaces是200*20的矩陣?每一行代表一張主成分臉（共40人，每人5張），每個臉20個維特征
%?W是分離變換矩陣?10304*20?的矩陣
[LowDimFaces?W]?=?fastPCA（FaceContainer?20）;?%?主成分分析PCA
visualize_pc（W）;%顯示主成分臉
save（‘Mat/LowDimFaces.mat‘?‘LowDimFaces‘）;
display（‘計算結束。‘）;

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

?????文件???????3510??2008-06-25?11:30??數字圖像處理與機器視覺（光盤）\chapter10\bw_mouth.bmp

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\1.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\10.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\2.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\3.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\4.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\5.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\6.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\7.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\8.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s1\9.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\1.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\10.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\2.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\3.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\4.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\5.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\6.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\7.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\8.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s10\9.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\1.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\10.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\2.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\3.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\4.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\5.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\6.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\7.pgm

?????文件??????10318??2007-10-30?06:16??數字圖像處理與機器視覺（光盤）\chapter10\code\PCA_ORL\Data\ORL\s11\8.pgm

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