7-12.txt

小波神经网络对短期电力负荷的预测

P=[0.448190873	0.469191617	0.479066342	0.479110093	0.475693097	0.464571162	0.449452814	0.430146276	0.401214835	0.362833059	0.359544401	0.394494597	0.1004;
0.490236113	0.47702752	0.46621797	0.469979145	0.456243054	0.430187111	0.422244746	0.430058773	0.44307938	0.467657396	0.480336595	0.47925739	0.1009;
0.557337864	0.524051685	0.493259345	0.480343887	0.435062492	0.365879625	0.337582581	0.348271085	0.373133632	0.427111377	0.45971124	0.467206755	0.0983;
0.515428255	0.59754408	0.613425892	0.570743339	0.488967318	0.347342093	0.284239233	0.307879654	0.334095583	0.39680322	0.442718721	0.462451108	0.0968]';
T=[0.490236113	0.47702752	0.46621797	0.469979145	0.456243054	0.430187111	0.422244746	0.430058773	0.44307938	0.467657396	0.480336595	0.47925739;
0.557337864	0.524051685	0.493259345	0.480343887	0.435062492	0.365879625	0.337582581	0.348271085	0.373133632	0.427111377	0.45971124	0.467206755;
0.515428255	0.59754408	0.613425892	0.570743339	0.488967318	0.347342093	0.284239233	0.307879654	0.334095583	0.39680322	0.442718721	0.462451108;
0.493154341	0.534374134	0.545284312	0.53201155	0.498300981	0.435168954	0.387102043	0.354887777	0.309155741	0.259402937	0.275678514	0.362386793]';
threshold=[0 1;0 1;0 1;0 1;0 1;0 1;0 1;0 1;0 1;0 1;0 1;0 1;0 1];
net=newff(threshold,[27,12],{'tansig','logsig'},'trainlm');
net.trainParam.epochs=1000;
net.trainParam.goal=0.008;
LP.lr=0.1;
net=train(net,P,T);

P_test=[0.493154341
	0.534374134
	0.545284312
	0.53201155
	0.498300981
	0.435168954
	0.387102043
	0.354887777
	0.309155741
	0.259402937
	0.275678514
	0.362386793
	0.0996];
Out=sim(net,P_test);