Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
28 lines (21 sloc) 1.09 KB
% Copyright (c) Philipp Wagner. All rights reserved.
% Licensed under the BSD license. See LICENSE file in the project root for full license information.
% load function files from subfolders aswell
addpath (genpath ('.'));
% load data
[X y width height names] = read_images('/home/philipp/facerec/data/yalefaces_recognition');
% Learn Eigenfaces with 100 components
eigenfaces_train = @(X,y) eigenfaces(X,y,30);
eigenfaces_test = @(model, Xtest) eigenfaces_predict(model, Xtest, 1);
% a 10-fold cross validation (per fold=0, debug=1)
cv1 = KFoldCV(X,y,10,eigenfaces_train, eigenfaces_test, 0, 1);
% tpr = tp / (tp+fp)
tpr_eigenfaces = cv1(1)/(cv1(1)+cv1(2));
fprintf(1,'TPR_{Eigenfaces}=%.2f%%\n', tpr_eigenfaces*100.0);
% Learn the Fisherfaces (no parameters needed)
fisherfaces_train = @(X,y) fisherfaces(X,y);
fisherfaces_test = @(model, Xtest) fisherfaces_predict(model, Xtest, 1);
% a 10-fold cross validation (per fold=0, debug=1)
cv2 = KFoldCV(X,y,10, fisherfaces_train, fisherfaces_test, 0, 1);
tpr_fisherfaces = cv2(1)/(cv2(1)+cv2(2));
fprintf(1,'TPR_{Fisherfaces}=%.2f%%\n', tpr_fisherfaces*100.0);