求大神帮助，神经网络

子任

求大神看看我这代码哪里出问题了。。。谢谢了
4 F3 P. w& Z6 |$ Q7 O3 x2 p% E, ~
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>
for i=1:14
( c3 b& w2 i  c+ w3 C. e7 Wfor j=1:3
ptest(i,j)=P(i,j)/a(i);
end
end
' F- Q2 `! u2 B. _/ k

pl=ones(1,14);
p2=0.8.*ones(1,14);
9 t6 I8 S& i/ B6 U, Hp3=0.6.*ones(1,14);
/ P( w' r$ a: L; _8 ]p4=0.4.*ones(1,14);
p5=0.2.*ones(1,14);
p6=0.*ones(1,14);
9 y6 e8 ?( E' n; s- p& N3 U* A/ jptrain=[pl;p2;p3;p4;p5;p6];
) j& R2 y( q: F& u, m- ct=[100,80,60,40,20,0];
/ R3 S3 X" ?6 P( h; ~7 v6 w
7 ~9 I% t" g8 N* m/ Y9 t
net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
net=init(net);
! K. U9 K9 p8 Jnet.trainparam.epochs=100000;
3 ~& S4 ?. I  z& V8 p2 y: ^% knet.trainparam.goal=1e-10;
. l7 i0 m0 b. K6 h9 `( v1 i[net,tr]=train(net,ptrain',t);
' U- \  i/ x3 O! j3 E- w; e
0 d  v! G8 |0 e# N
- j/ j' z) U& d$ K# I1 W1 J# nfor i=1:3
1 s7 |+ B& b) }, C7 fa=ptes(:,i);
5 x- F+ d( X8 A% Gscore(i)=sim(net,a); %#ok<SAGROW>
8 [. ]2 P  A2 ]4 e8 t1 z( h4 kend



! I  {# g& k# w! O3 `  W8 J) M

森之张卫东

给附上代码吧！！！