求大神帮助，神经网络

子任

求大神看看我这代码哪里出问题了。。。谢谢了
; x2 x# O7 Q& A$ M$ p2 {4 K
# y6 J6 `( W2 h0 R% Q" ?' M! Lp=[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];
: }* ?/ ~9 |' m( S

a=max(p'); %#ok<UDIM>
; o. `# p" m* ]) U8 Jfor i=1:14
for j=1:3
/ W) b, _: X& o! G4 rptest(i,j)=P(i,j)/a(i);
end
; D3 p+ j- b3 e4 N) v; D1 Zend


; z; y2 y( X3 m( ]3 y5 Npl=ones(1,14);
$ F8 A8 ^1 C8 `  H) J" ^7 b+ Wp2=0.8.*ones(1,14);
p3=0.6.*ones(1,14);
p4=0.4.*ones(1,14);
p5=0.2.*ones(1,14);
1 R( N+ Y+ u: f* wp6=0.*ones(1,14);
$ y4 n9 @$ i  ?3 ^9 `; Bptrain=[pl;p2;p3;p4;p5;p6];
t=[100,80,60,40,20,0];
1 X7 e/ Q* U" j" Z$ l
) z& J  f2 e! K: p5 a8 K: H" D& e
2 i- U: G3 o& @+ I9 }: L) c6 Rnet=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
4 D8 G0 I& r/ |- q" i; e* cnet=init(net);
4 t0 ^) p3 Z3 Anet.trainparam.epochs=100000;
- y; d, x5 Z1 _: Y: M  g3 u- w" ?net.trainparam.goal=1e-10;
[net,tr]=train(net,ptrain',t);
* r. M: S# o5 `8 s7 h

for i=1:3
! H7 A# \0 Q" F$ n8 A6 aa=ptes(:,i);
score(i)=sim(net,a); %#ok<SAGROW>
end

( B) `2 D( o5 H# \
) G% Q" a$ Y. p. B3 ?' W

森之张卫东

给附上代码吧！！！