一个神经网问题求教

twntdx

%训练样本的输入
p=[528500  66830    16542   39387;
9 V/ z  J8 `; D1 ^$ W. a538500  66811   16608   39712;
" T/ L, i% l8 M: Y548000  67519   16683   40245;
2 Q/ i# o- N  m: u" @! M557200  67377   16754   41012;
; M  r7 g' k: z; N- h562980  68666   16824   43021;
571606  69830   16850   46012;
8 O, ]6 z  d7 R; S7 U574560  71489   16910   50234;
; X* K2 k( K% \8 Q  }4 i+ _584590  73591   16928   55743;
589848  73928   16930   61081;
597773  75549   16973   65279;
/ C! j7 _9 H2 v) R! ~605412  76280   17118   70523;
) H: o$ o) w; c8 g2 O6 }* ^# c613010  76828   17230   74533;
$ j9 c1 Z8 y$ a- U4 M. R; `" i619973  77737   17492   78674];
%目标向量
5 m+ D% n; ~+ m: L" g3 j' |1 Gq=[627252   79158   17460   83423;
7 \7 A6 t* v/ ^. h/ U% W636969  81898   17495   87654;
644598  83080   17573   91987;
9 p8 b8 |' |, y$ `) x$ P651776  83719   17770   96452];
[pn,minp,maxp,qn,minq,maxq]=premnmx(p,q);
+ h1 s) b; U0 x7 u1 S& @%选择训练函数1、TRAINGLM
, R9 ]: f% S+ [  R! Z  d  Vnetl=newff(minmax(pn),[9 1],{'logsig','Purelin'},'trainglm');
netl.trainParam.epochs=5000;(%训练最大迭代次数)
8 _; X  R( I+ ]  _6 k6 [/ E6 knet1.trainParam.goal=0;(%训练目标收敛精度)
net1=train(net,pn,qn);
end
哪位大哥帮我看看这个程序啊
还有谁有bp神经网程序包啊

唯世

？？？？？？？？？？？？？？？、、