13-18.txt

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

P=[0.651582178	0.712729157	0.409680376	0.143982146	0.943567671	0.659461183	0.255810617	0.65011956	0.533326279	0.422433445	0.642212657	0.6582337	0.1004;
0.503047983	0.632986609	0.522012594	0.160429619	0.829810298	0.877941176	0.058903236	0.718894468	0.550783915	0.35322015	0.684118444	0.638490355	0.1009;
0.568269568	0.618663319	0.490303682	0.375641639	0.759162283	0.400318827	0.654228439	0.418527818	0.682400765	0.263633828	0.727275626	0.669093735	0.0983;
0.74283437	0.627195919	0.465208034	0.167670971	0.901574207	0.63865774	0.246349434	0.759066635	0.352004623	0.702702056	0.389825442	0.723130878	0.0968]';
T=[0.503047983	0.632986609	0.522012594	0.160429619	0.829810298	0.877941176	0.058903236	0.718894468	0.550783915	0.35322015	0.684118444	0.638490355;
0.568269568	0.618663319	0.490303682	0.375641639	0.759162283	0.400318827	0.654228439	0.418527818	0.682400765	0.263633828	0.727275626	0.669093735;
0.74283437	0.627195919	0.465208034	0.167670971	0.901574207	0.63865774	0.246349434	0.759066635	0.352004623	0.702702056	0.389825442	0.723130878;
0.771321537	0.943607524	0.100470269	0.290718157	0.917117009	0.59361151	0.344404591	0.581834848	0.556591742	0.506445879	0.545134306	0.628064722]';
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.01;
LP.lr=0.1;
net=train(net,P,T);

P_test=[0.771321537
	0.943607524
	0.100470269
	0.290718157
	0.917117009
	0.59361151
	0.344404591
	0.581834848
	0.556591742
	0.506445879
	0.545134306
	0.628064722
	0.0996];
Out=sim(net,P_test);