求大神帮助，神经网络

子任

求大神看看我这代码哪里出问题了。。。谢谢了
. c; V3 V6 x# A, F" _; G
* B( e1 |2 t: O6 t' O% g2 K8 p( Op=[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];
) n9 s# \7 g% k8 o( G
) Q9 @7 L8 D% D+ t7 Y
4 d+ L! q" `' U) b2 aa=max(p'); %#ok<UDIM>
for i=1:14
2 n$ k* s3 {. H+ A# e) E( lfor j=1:3
" u0 g# {! k" K, hptest(i,j)=P(i,j)/a(i);
end
: Q  ^$ t' x1 \7 jend
0 v- K7 x2 K0 F; J/ r9 ^1 L- v. s

& e7 h9 O* q3 ?6 h5 s! Lpl=ones(1,14);
p2=0.8.*ones(1,14);
p3=0.6.*ones(1,14);
p4=0.4.*ones(1,14);
# |! f! z: b' `8 M# e. Zp5=0.2.*ones(1,14);
. f# c5 x0 C  E  [5 M# Np6=0.*ones(1,14);
( z8 ?' I4 C6 b5 k) {( K8 {3 aptrain=[pl;p2;p3;p4;p5;p6];
- L- Z& w  V  r7 z1 k0 wt=[100,80,60,40,20,0];

( h7 U* b# _! B) M. c
# q9 I0 T! |1 \9 X# G2 `net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
" E% @+ ~) R8 K. a9 j* S' }net=init(net);
net.trainparam.epochs=100000;
net.trainparam.goal=1e-10;
[net,tr]=train(net,ptrain',t);
! w. l3 T9 E+ i  @& D

for i=1:3
a=ptes(:,i);
score(i)=sim(net,a); %#ok<SAGROW>
end

0 p% d% i/ Z, W2 P# d% a2 ]5 I
- [" r% ^# i: P9 s& A" J( k, ]" N

森之张卫东

给附上代码吧！！！
3 v$ C7 p* _6 P9 B! ^0 X* ~