example31.m

来自「是一个用MATLAB编的一个系统」· M 代码 · 共 44 行

%example31
%==============
%==============
figure('name','训练过程图示','numbertitle','off');
P=[0 0 1 1;
   0 1 0 1];

T1=[0 1 1 0];

T2=[0.2 0.8 0.8 0.2];

[R,Q]=size(P);
[S2,Q]=size(T1);
S1=str2num(S1);
[W1,B1]=rands(S1,R);
[W2,B2]=rands(S2,S1);

%initialize the parameters
%plotpv(P,T1);
%figure;
disp_freq=10;
max_epoch=str2num(max_epoch);
err_goal=str2num(err_goal);
lr=str2num(lr);
TP=[disp_freq max_epoch err_goal lr];

%training begins
[W1,B1,W2,B2,epochs,errors]=trainbp(W1,B1,'logsig',W2,B2,'logsig',P,T2,TP);
A2=logsig(W2*logsig(W1*P,B1),B2);

%ploterr(errors);
SSE=sumsqr(T2-logsig(W2*logsig(W1*P,B1),B2));
fprintf('Trained network operates:');
if SSE < err_goal
   disp('Adequately.')
else   
   disp('Inadequately.')
end