数学建模社区-数学中国
标题:
求大神帮助，神经网络
[打印本页]
作者:
子任
时间:
2015-3-19 21:56
标题:
求大神帮助，神经网络
求大神看看我这代码哪里出问题了。。。谢谢了
- [( T# s; n2 O- q8 g! A
" d; i2 a, B/ ~( W- G
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 {* f9 n6 N8 r$ ^% ^8 v
* N2 U- l$ ^& l% B* b: \. Z
, Y- E7 n1 ?# T& X
a=max(p'); %#ok<UDIM>
4 U8 N g* f& ?9 m# s2 ]
for i=1:14
4 m6 ^3 O6 w- Y6 z
for j=1:3
' Q0 \/ E1 h5 t `3 t, o+ o3 f
ptest(i,j)=P(i,j)/a(i);
$ p4 m$ K6 t5 h9 H1 \
end
6 q3 p. W# K8 C# r, M& V7 d
end
3 b; a* c+ G( ~9 O- E: d' D
0 }8 c2 |; H0 j* F
2 |$ {; y9 x: H
pl=ones(1,14);
/ Y% L- [' u% b( D( t' k: a
p2=0.8.*ones(1,14);
# Y% Z5 `& h: P8 w5 Y. ~$ g
p3=0.6.*ones(1,14);
6 H) G1 Q1 m: X: n4 i
p4=0.4.*ones(1,14);
4 u+ }9 @6 e ]7 {7 w C
p5=0.2.*ones(1,14);
: J% W+ K2 O* W' Q
p6=0.*ones(1,14);
2 r, m4 L7 t1 \. o, g
ptrain=[pl;p2;p3;p4;p5;p6];
- q% [6 X( X2 z$ {) W7 N+ [% {9 B, f
t=[100,80,60,40,20,0];
' |* N( {+ l! E' [9 ?% `
- f4 X; L* _! d
5 D* P3 h. d( J
net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
2 K1 q: C, s) z# t' d8 C
net=init(net);
& `5 B& U1 ^- f. r1 ~ |$ M5 H- _
net.trainparam.epochs=100000;
3 R' V8 {1 k' A7 |5 T2 J- G
net.trainparam.goal=1e-10;
% Q. x) T2 r* ^3 q5 g3 ^% ^
[net,tr]=train(net,ptrain',t);
4 t- b6 a z2 f3 |
* M( @- [/ N/ w2 F: u
$ `! m% ]2 s; ~
for i=1:3
4 O0 D2 P3 n+ M1 ~
a=ptes(:,i);
: O& R, B; k4 H
score(i)=sim(net,a); %#ok<SAGROW>
: l7 _( A2 a) j h5 u& P- ]
end
% [# L$ i% u' l/ {! b t4 m2 \
+ l( N1 O* O5 I$ g, m2 s) K
& [4 j$ l" t _4 F# M0 r8 e, U
3 T$ @1 C' W: C8 o$ D
作者:
森之张卫东
时间:
2015-9-7 19:05
给附上代码吧！！！
* `9 ~- [" R0 t3 }& s# R- C
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5