simple.m

来自「一种新的人脸识别算法程序」· M 代码 · 共 18 行

function net_tr = simple(targets)
% WBL 22 Sep 2002 fake MLP
% $Revision: 1.1 $  $Date: 2002/10/31 11:30:49 $

[Q,ntests] = size(targets);        %Q is junk

%    DEFINING THE NETWORK
%    ====================
% S2 = number of output nodes (ie 2)
S2 =  2;

net_tr = zeros(S2,ntests);
if(mean(targets(2,:))<0.5)
    net_tr(1,:) = 1;
else
    net_tr(2,:) = 1;
end
fprintf('simple mean %f\n',mean(targets(2,:)))