ga_f352.m

其中提到遺傳學的程式碼與應用提供給次淚相向的研究者參考下載

function PI=GA_f352(x)
global MIN_offset MUL_factor Emin net 
% Fitness function evaluation of Example 3.5-2

% PenChen Chou, 7-24-2001
A(1,1)=GA_round4dp(x(1));
A(1,2)=GA_round4dp(x(2));
A(2,1)=GA_round4dp(x(3));
A(2,2)=GA_round4dp(x(4));
net.IW{1,1}=A;
B(1,1)=GA_round4dp(x(5));
B(2,1)=GA_round4dp(x(6));
net.b{1}=B;
C(1,1)=GA_round4dp(x(7));
C(1,2)=GA_round4dp(x(8));
net.LW{2,1}=C;
net.b{2}=GA_round4dp(x(9));
In_pattern=[ 0 0;0 1;1 0;1 1]';
Target=[1 0 0 1];
Neural_out=sim(net,In_pattern);
ERR=MUL_factor*sum(abs(Target-Neural_out));
PI=ERR;
if MIN_offset>0
   PI=MIN_offset-PI;
   if PI<0, PI=10; end;
end;
if Emin>ERR
   Emin=ERR; fprintf('\nERR=%f\n',ERR);
else
   fprintf('>'); 
end;