数学建模社区-数学中国
标题:
求大神帮助，神经网络
[打印本页]
作者:
子任
时间:
2015-3-19 21:56
标题:
求大神帮助，神经网络
求大神看看我这代码哪里出问题了。。。谢谢了
1 ~% G i% I3 R9 f" _; K/ G
/ D- c1 V' o! V$ e8 V, c2 y' 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];
6 u! s2 a% ?4 w$ J
' u* @. C1 R+ G3 j" E9 l
/ E! z |" D8 W! V) q4 p( g
a=max(p'); %#ok<UDIM>
7 B f5 V3 g/ j' v& K$ A' @
for i=1:14
! E% P! V( n1 V s
for j=1:3
" L5 L0 G" m* G( \: G
ptest(i,j)=P(i,j)/a(i);
4 S* q) M1 o# W# u
end
3 L3 U/ }* e f% h( U1 O
end
/ x8 C- z7 @$ ^- A
. c7 z& t. e- J
& m' U9 S- D( k! ~: R4 ]% v4 W
pl=ones(1,14);
) N7 ]6 v3 v( p) W5 q% m6 u
p2=0.8.*ones(1,14);
+ L2 A+ e" o9 S% D+ n
p3=0.6.*ones(1,14);
7 L% l" K' ?! L, u6 [
p4=0.4.*ones(1,14);
& P; A3 p' {3 ~$ N+ T, M
p5=0.2.*ones(1,14);
; i* I% M( Z e$ F0 v5 m R
p6=0.*ones(1,14);
1 o- Z+ `/ W7 c
ptrain=[pl;p2;p3;p4;p5;p6];
0 O' s, ^9 A1 k* Z0 d$ J
t=[100,80,60,40,20,0];
' L$ A7 y. m, v* `
" Z% F. {. ^& S" l) O
1 n- U: Z4 {9 V& Q8 [4 h. ^6 ^
net=newff(minmax(ptrain'),[59,1],{tansig','purelin'},traingd');
7 e& V9 K% y5 H! u
net=init(net);
* l6 |* w5 o% }* t: }$ s( ^
net.trainparam.epochs=100000;
' z u3 Q$ [# Q3 D
net.trainparam.goal=1e-10;
( }$ `" H( ~$ M S
[net,tr]=train(net,ptrain',t);
' d4 a) Y$ p7 S" L X( T
1 o$ q8 A; b9 i3 E
6 ~6 v5 f( _6 `- x% `3 T
for i=1:3
& a2 V1 d3 V) r `' ~* q
a=ptes(:,i);
3 c, z( S: l0 r5 ]! w7 h
score(i)=sim(net,a); %#ok<SAGROW>
3 O; G4 L( v: J5 K5 z! E s7 G
end
f3 M! ^% `7 c# P V' L
1 A# ?, _9 R: \: A2 P& V
1 h9 H c: L% Z- }
* `4 j+ l9 [& l& Y1 }" l% f- j" c# [
作者:
森之张卫东
时间:
2015-9-7 19:05
给附上代码吧！！！
1 R5 B& b! `7 A* A' C
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5