求大神帮助，神经网络

子任

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

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];

7 S' u5 B1 {# B: ?- W# D
5 A+ q- J+ H2 w9 W' R5 l- u) ~* Oa=max(p'); %#ok<UDIM>
for i=1:14
% S4 {0 C" k/ [for j=1:3
7 t- a$ l0 C5 Q* u$ L3 Dptest(i,j)=P(i,j)/a(i);
end
end
$ E4 m, B( ~! v3 |
: V# N. I0 o; q0 @" E1 x# ~: B/ L
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);
. |3 X0 r) ~- |/ A+ K' ]0 k( [p6=0.*ones(1,14);
ptrain=[pl;p2;p3;p4;p5;p6];
, x% s5 o5 u/ Z2 O8 ?t=[100,80,60,40,20,0];

6 a2 ]5 u' R9 ?7 y& a
# r' J- E) s: T: g; E; fnet=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
0 P5 H  |! P8 U8 R' N0 bnet=init(net);
net.trainparam.epochs=100000;
* W% P) S4 k2 Z9 ?7 ^) ~net.trainparam.goal=1e-10;
[net,tr]=train(net,ptrain',t);
$ e6 p% Z  c' ]4 u5 T; Q

" a/ V5 V5 `9 ]( L7 Lfor i=1:3
a=ptes(:,i);
/ u+ d% o& g/ L% f9 Sscore(i)=sim(net,a); %#ok<SAGROW>
end
) p# p) Y3 ^7 D* Y6 j1 X/ g

+ K7 r5 r! \  F* H' j+ a

森之张卫东

给附上代码吧！！！
4 g; w' e4 k& [4 p- C6 X