数学建模社区-数学中国
标题:
求助
[打印本页]
作者:
422258511
时间:
2012-6-19 20:47
标题:
求助
p=[724.570000000000,739.774223126620,771.489090673942,804.563606600594,839.056060404793,875.027240514377,912.540541418428,951.662075391767,992.460789009143,1035.00858465455]
; s3 q8 M6 h; _
t=[724.570000000000,746.620000000000,778.270000000000,800.800000000000,827.750000000000,871.100000000000,912.370000000000,954.280000000000,995.010000000000,1037.20000000000]
1 X( t* c8 {9 H8 k- Q& ^
[pn,minp,maxp,tn,mint,maxt]=premnmx(p,t); %原始数据归一化
, t% u# {. ~: q
- W( I2 u- P: [8 J" W
net=newff(minmax(pn),[9,1],{'tansig','purelin'},'traingdx'); %设置网络,建立相应的BP网络
* _* g( ]9 k: R0 w, R
net.trainParam.show=2000; % 训练网络
' ]. I: c, w2 o, R# R7 P' i
net.trainParam.lr=0.01;
/ i1 U" h2 k. n( m6 o Q
net.trainParam.epochs=10000;
" C' `3 d3 P+ q5 D
net.trainParam.goal=1e-5;
, v% ^/ [7 g& w
[net,tr]=train(net ,pn,tn); %调用TRAINGDM算法训练BP网络
2 f. i1 j! m0 ?! D
`4 `: X0 T% Y
an=sim(net,pn); %对BP网络进行仿真
0 n# L" b; V0 C- j, q) T2 I
a=postmnmx(an,mint,maxt); %还原数据
) X" T. Z1 K0 {6 L% Y* t9 P5 d
x=2001:2010;
' z m! M: m* r
newk=a(1,
;
! `0 ~) e3 Y& z% r. d% d2 b
plot(x,newk,'r-o',x,t,'b--+')
( S |' E& {# K/ E- Y3 Z& h! I, `
legend('网络输出值/万人','实际人口数/万人');
* |3 F1 R9 h. j- Y! V7 u
xlabel('年份');
& D8 ~$ f7 }0 f' _
ylabel('人口数');
/ c) z9 u# b2 i" ~2 s& K3 Q
title('预测人口数对比表');
( Q& |. ?1 g' P0 A: c
2 _$ Y9 S h( g. f2 S s$ H
pnew1=[1079.38044723977,1125.65457635540,1173.91252408743,1224.23933874207,1276.72371473226,1331.45814888992,1388.53910347951,1448.06717620014,1510.14727747579,1574.88881534617]
3 {5 k/ G% T# D/ I. m: c
pnew=pnew1
# U; A6 i+ E. t; q# u5 Q
pnewn=tramnmx(pnew,minp,maxp);
/ F' B4 x, u0 l- F
anewn=sim(net,pnewn); %对BP网络进行仿真
$ @2 @ w( r% i, `! q# C" [
anew=postmnmx(anewn,mint,maxt); %还原数据
0 r9 v: E) [1 A( i$ S) o
y=anew'
: v D9 l& m( s0 Y4 m
5 Q3 t6 G4 z, d0 g" w q" ^; V! w
1 I/ s; w# ~4 X& X6 W# J' h
预测的结果怎么都一样呀?》??求助
作者:
wssl103050
时间:
2012-6-19 22:57
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5