求大神帮助，神经网络

子任

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

3 m/ u/ H& m/ H$ r6 qp=[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];
; \! i& T5 M( N7 M8 `" G# S  @

& f" w) V, e# V& @a=max(p'); %#ok<UDIM>
for i=1:14
6 [# K+ Z% n9 n  T7 k% Pfor j=1:3
7 `9 q- J1 i  Q3 h0 w3 Qptest(i,j)=P(i,j)/a(i);
) t/ [/ @8 K" }) _& @end
- Q7 c/ E% }, }3 f3 f$ N& Xend
$ ]) U* `5 V7 x8 z" c
' T: S; c: i' Z% T' l/ x( j0 [/ ~
pl=ones(1,14);
p2=0.8.*ones(1,14);
p3=0.6.*ones(1,14);
3 z2 u; l8 X( U  {$ D0 hp4=0.4.*ones(1,14);
p5=0.2.*ones(1,14);
p6=0.*ones(1,14);
2 y; v, y; o& X: hptrain=[pl;p2;p3;p4;p5;p6];
t=[100,80,60,40,20,0];
5 h9 _3 ^+ ~2 z, I* t

net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
4 m+ G1 q* n" t. v5 A" Y& l/ x2 {' rnet=init(net);
net.trainparam.epochs=100000;
2 L0 _- w& c. J$ Q1 i+ qnet.trainparam.goal=1e-10;
9 k! C) Q/ Y1 _+ p[net,tr]=train(net,ptrain',t);


7 H. I0 C  ^: T5 Afor i=1:3
6 P! K9 d& K+ n+ w" E- ba=ptes(:,i);
- ^8 ?2 P; e( X' Hscore(i)=sim(net,a); %#ok<SAGROW>
. Z! F. H3 @" u! {. h8 K; `& kend

% K6 t# ?! j7 y6 ~4 X7 x
% @5 Y8 ]1 C9 L! p3 y) G4 T: z

森之张卫东

给附上代码吧！！！