数学建模社区-数学中国
标题:
求大神帮助，神经网络
[打印本页]
作者:
子任
时间:
2015-3-19 21:56
标题:
求大神帮助，神经网络
求大神看看我这代码哪里出问题了。。。谢谢了
% z& H( S& j: b3 B N8 f+ ^
! W# [- v: h6 {. P7 U
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];
) c/ m0 \1 }0 |+ ^ v. L# ^
# c f: P, S0 ~$ U r- W" b0 l4 A
5 v, B; i) k' `3 T, |
a=max(p'); %#ok<UDIM>
; u2 b/ ~' _7 f) I" D( ?# `8 [
for i=1:14
( U1 J- @6 _) x4 Q b
for j=1:3
1 Z" a0 p" l- |5 J# \
ptest(i,j)=P(i,j)/a(i);
1 p! Y! k+ D/ Y9 G6 ^1 \
end
' F2 B$ j) N6 n9 K
end
. k! V: Y0 N) l- T/ i
, W" i; h7 i: Q9 J
! }& _5 L2 J$ Q, m/ q
pl=ones(1,14);
: b6 c0 |) E/ H3 ^& Q! ^
p2=0.8.*ones(1,14);
5 A, _' q1 f, w, q0 K8 C0 R
p3=0.6.*ones(1,14);
0 O% H w6 g! i* z {
p4=0.4.*ones(1,14);
9 h- z' s7 A# r) S9 `* l' ~
p5=0.2.*ones(1,14);
1 L4 p+ A0 d% J$ l# m& r6 D" K; {, Y
p6=0.*ones(1,14);
3 z7 s6 L {/ c" z7 _" [
ptrain=[pl;p2;p3;p4;p5;p6];
' f( I9 l9 ^+ u/ _: i6 E) l* g9 i
t=[100,80,60,40,20,0];
1 H- n, h: d8 ^; x) b
' ~7 u v& s* O- j& y9 J% ] F
5 P! c: C& u- R9 A u. W
net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
; X# K4 _3 z+ H
net=init(net);
! Z$ Q! y. z' U% i
net.trainparam.epochs=100000;
0 l9 w8 }8 R4 Z% C6 ~4 \+ r
net.trainparam.goal=1e-10;
5 b! B- P7 H& A# L& x) q% ~7 v
[net,tr]=train(net,ptrain',t);
. M; Z6 p* @. c8 N H1 M
$ G8 x( w" u) b! ~+ f
' X. ^9 J4 d$ O( \1 l' V1 i
for i=1:3
' F: r6 W4 |# f- @0 U* D4 y
a=ptes(:,i);
_) g. n; R- P! x# o
score(i)=sim(net,a); %#ok<SAGROW>
% H3 ]2 P4 r9 }3 b/ c& J
end
0 t5 h9 a4 t8 e" o& ~
2 n' f/ G* n% y% G1 Q2 h
% t: K3 U5 ^, F) K {3 `6 o1 p
& P1 D3 T; }9 Q3 \ U
作者:
森之张卫东
时间:
2015-9-7 19:05
给附上代码吧！！！
9 ^9 Y% Y+ v+ g+ b
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5