3-1-2.m

《神经网络理论与Matlab R2007实现》（程序代码）

P = [ -0.5 -0.5 +0.3 -0.1 -0.8; ...
      -0.5 +0.5 -0.5 +1.0 +0.0 ];
T = [1 1 0 0 0];
plotpv(P,T);
net = newp([-40 1;-1 50],1);
%对训练前的样本进行绘图，并获得绘图的句柄linehandle
hold on
plotpv(P,T);
linehandle=plotpc(net.IW{1},net.b{1});
%设定自适应循环次数为3
net.adaptParam.passes = 3;
linehandle=plotpc(net.IW{1},net.b{1});
for a = 1:25
   [net,Y,E] = adapt(net,P,T);
   linehandle = plotpc(net.IW{1},net.b{1},linehandle);  drawnow;
end;