求大神帮助，神经网络

子任

求大神看看我这代码哪里出问题了。。。谢谢了
& P% W' c8 s1 T. l0 Y
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];
- R& T- X4 ~# r/ C) ~9 B- R7 a
. @/ S- T  z' ^
& v, c  L1 Y1 r' e0 U% C: G9 O$ `8 ?a=max(p'); %#ok<UDIM>
for i=1:14
0 m  h' A1 d- |; r$ t9 \* T+ w4 ffor j=1:3
6 j5 @8 o& T7 s: v& W2 ^% Qptest(i,j)=P(i,j)/a(i);
: j, r( N' b! ], Zend
end

% O2 B7 ]+ h5 n& U4 {% k
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);
p6=0.*ones(1,14);
$ c% m! g/ Z) _; x5 y5 D$ _# iptrain=[pl;p2;p3;p4;p5;p6];
t=[100,80,60,40,20,0];


net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
) ]- i* ~, W. q2 Vnet=init(net);
net.trainparam.epochs=100000;
7 e8 b  I0 i. ?7 @9 V; o6 b5 unet.trainparam.goal=1e-10;
[net,tr]=train(net,ptrain',t);
% G, e) A/ J6 X

for i=1:3
a=ptes(:,i);
% _4 s9 E3 I& a) \, oscore(i)=sim(net,a); %#ok<SAGROW>
8 u& [8 D4 U* I4 Y2 S. Oend


# t. V' p* W1 C* T* q$ X' V+ z
5 B# P+ D8 f* f5 Q: @. G/ x

森之张卫东

给附上代码吧！！！
2 v: G6 t/ {4 z5 @$ Y