perp1.m

来自「人工神经网络资料」· M 代码 · 共 15 行

P=rand(2,10)*10;
T=zeros(1,10);
for i=1:10
if (P(1,i)<= P(2,i)) T(i)=1
end
end 
figure(1);
plotpv(P,T);
net=newp(minmax(P),1);
net.iw{1,1} = [-1 -1];
net.b{1} = 1;
linehandle=plotpc(net.IW{1},net.b{1})
net=train(net,P,T);
figure(1);
linehandle=plotpc(net.IW{1},net.b{1})