求大神帮助，神经网络

子任

求大神看看我这代码哪里出问题了。。。谢谢了

p=[1 2 3;3 2 1;5 6 1;7 3 1;3 5 2;9 3 5;7 4 2;4 5 6;0 3 4;6 0 1;4 2 3;9 2 7;8 0 1;3 6 2];


a=max(p'); %#ok<UDIM>
. @; S) z8 p7 [/ k( D/ ]! S9 Sfor i=1:14
5 e3 e! f" J( b2 h1 B/ yfor j=1:3
ptest(i,j)=P(i,j)/a(i);
end
end


0 X3 ^1 }7 r" a6 ^pl=ones(1,14);
p2=0.8.*ones(1,14);
p3=0.6.*ones(1,14);
p4=0.4.*ones(1,14);
p5=0.2.*ones(1,14);
p6=0.*ones(1,14);
8 Z2 E' G' a0 _. B2 P2 mptrain=[pl;p2;p3;p4;p5;p6];
t=[100,80,60,40,20,0];

. b+ w7 |$ U' p/ Y$ ^  }
. E6 p- s9 _' enet=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
5 u- E' Q$ C' k) N7 B% K3 _net=init(net);
net.trainparam.epochs=100000;
net.trainparam.goal=1e-10;
3 O2 w; A. d& G- b' S& c[net,tr]=train(net,ptrain',t);
- P  I  P9 a6 x1 l
& |  u5 ]* R& U+ ]- {- ^# T
( ^) B9 H0 [/ `- N, U1 w/ Z5 ofor i=1:3
* B0 x7 C# t" \4 }2 L8 Ga=ptes(:,i);
3 f# c2 I- z7 _+ b: q# z3 bscore(i)=sim(net,a); %#ok<SAGROW>
end
- Y! Y* Q* W/ `( ^! U7 \9 D

& V* g- u2 a! U% l& p
! j4 X5 i/ y( w  d. t( D

森之张卫东

给附上代码吧！！！
% R$ |9 d) F1 q/ ^+ K; O