求助

422258511

p=[724.570000000000,739.774223126620,771.489090673942,804.563606600594,839.056060404793,875.027240514377,912.540541418428,951.662075391767,992.460789009143,1035.00858465455]
4 g" c0 T1 w$ F- L, {t=[724.570000000000,746.620000000000,778.270000000000,800.800000000000,827.750000000000,871.100000000000,912.370000000000,954.280000000000,995.010000000000,1037.20000000000]
9 E  D" i. e7 E/ o, [6 u: a) Y% ? [pn,minp,maxp,tn,mint,maxt]=premnmx(p,t);          %原始数据归一化

% t  v5 b: h" N. Gnet=newff(minmax(pn),[9,1],{'tansig','purelin'},'traingdx'); %设置网络,建立相应的BP网络
net.trainParam.show=2000; % 训练网络
! x) \4 z8 ]( ^" ^& Rnet.trainParam.lr=0.01;
+ M& j$ u8 o' X1 P, z. e# Onet.trainParam.epochs=10000;
net.trainParam.goal=1e-5;
[net,tr]=train(net ,pn,tn);                              %调用TRAINGDM算法训练BP网络
6 Z8 w! `6 P& _; m- y8 N  U) z
an=sim(net,pn);                               %对BP网络进行仿真
* k: P$ }$ \  A5 t$ l$ U1 ^a=postmnmx(an,mint,maxt);                     %还原数据
  c$ Z" I" u3 v) m+ s0 T% B0 @7 fx=2001:2010;
newk=a(1,;
7 F( b. v; _* A+ zplot(x,newk,'r-o',x,t,'b--+')
' F, {, U$ _! C( o4 S& glegend('网络输出值/万人','实际人口数/万人');
xlabel('年份');
ylabel('人口数');
5 Q. z" W6 N5 d/ u1 ^title('预测人口数对比表');

% x0 [* O6 {4 B: ?( k# \pnew1=[1079.38044723977,1125.65457635540,1173.91252408743,1224.23933874207,1276.72371473226,1331.45814888992,1388.53910347951,1448.06717620014,1510.14727747579,1574.88881534617]
pnew=pnew1
pnewn=tramnmx(pnew,minp,maxp);
anewn=sim(net,pnewn);                               %对BP网络进行仿真
2 y1 P0 i2 H1 h3 h( f# Qanew=postmnmx(anewn,mint,maxt);                     %还原数据
y=anew'

! @% x  R1 g& E, x) R: f1 k$ m9 W8 q9 H3 Z
7 X, \- S' ]. _( E. S预测的结果怎么都一样呀？》？？求助

wssl103050