求大神帮忙写遗传算法优化BP神经网络预测风电功率的matlab代码!!跪谢了!

导师叫我用遗传算法做毕设,但是我不太懂,现在仅把BP网络做出结果了,遗传算法修改后运行不了,就快要交稿了,求大神帮忙!!
附上我的BP网络代码

%%bp的风电场功率预测程序。
%要思考一个问题就是为什么再加入了粒子群变异的程序后,预测的结果反而变差了

clc;
%clear;
close all;
%数据输入及数据处理

ptrain=xlsread('ptrain.xlsx')';
ttrain=xlsread('ttrain.xlsx')';
ptest=xlsread('ptest.xlsx')';
ttest=xlsread('ttest.xlsx')';
tsx = ptrain;

ts = ttrain;
[r,q]=size(tsx);%r=2,q=430

[TS,TSps] = mapminmax(ts,0,1); %对样本输出数据归一化
TTR = TS;

[TSX,TSXps] = mapminmax(tsx,0,1);%对样本输入数据归一化
PTR = TSX;

Ts = ttest;
Tsx = ptest;
%{
[TT,TTps] = mapminmax(Ts,0,1); %对仿真输出数据归一化
TTE = TT;
%}
[TTX,TTXps] = mapminmax(Tsx,0,1);%对仿真输入数据归一化
PTE = TTX;

%建立BP模型
threshold=[0 1;0 1];%输入变量个数。
net=newff(threshold,[10,1],{'tansig','logsig'},'trainlm');

%{
% 设置训练参数
net.performFcn='sse';
net.trainParam.goal=0.0001;
net.trainParam.show=1;
net.trainParam.epochs=1000;
net.trainParam.Mu_max=1e-5;
net.trainParam.min_grad=1e-16;
net.trainParam.mc=0.95;
net.trainParam.mem_reduc=1;
%}
%隐层数的确定有几个经验公式,也可以用试算法
net.trainParam.epochs=1000;
net.trainParam.goal=0.01;
LP.lr=0.1;

%训练模型
net=train(net,PTR,TTR);

%计算均方误差

Yn=sim(net,PTR);
Y=mapminmax('reverse',Yn,TSps);
E=ts-Y;
MSE=mse(E);

%进行预测
out=sim(net,PTE);
%反归一化

predict = mapminmax('reverse',out,TTps);
predict = predict';
%绘图
figure
hold on;
grid on;
plot(ttest,'-o');
plot(predict,'r-^');
legend('实际功率','预测功率');
predict;
请发送给4.6.2.5.8.8.2.6.0

第1个回答  2014-05-06
错误信息呢,能不能把数据也放上来,方便调试
第2个回答  2014-05-08
百度下出错信息。
第3个回答  2016-05-04
都不给 原始 数据的啊 ???