多微网优化调度（风机、光伏、蓄电池、燃料电池、柴油机、电网交互）（Matlab代码实现）

最新推荐文章于 2024-04-08 23:30:53 发布

wlz249

最新推荐文章于 2024-04-08 23:30:53 发布

阅读量342

点赞数 2

文章标签： matlab 开发语言

本文链接：https://blog.csdn.net/weixin_66436111/article/details/128794348

版权

💥💥💞💞欢迎来到本博客❤️❤️💥💥

🏆博主优势：🌞🌞🌞博客内容尽量做到思维缜密，逻辑清晰，为了方便读者。

⛳️座右铭：行百里者，半于九十。

📋📋📋本文目录如下：🎁🎁🎁

目录

💥1 概述

📚2 运行结果

🎉3 参考文献

🌈4 Matlab代码及文章讲解

💥1 概述

以含有光伏（PV）、风机（W）、柴油发电机（de）、燃料电池（fc）、蓄电池（bat）的子微网1、子微网2 构成微网群进行算例分析，微网群算例系统拓扑结构如下图。

微网群采用并联式结构，其中子网1中分布式电源包括：PV1, W1，fc1，bat1;子网2中分布式电源包括PV2，W2，de2，bat2。微网群与配电网之间的公共连接点群PCC保持闭合，网PCC1与网PCC2也均保持闭合。微网1,2和配电网之间可存在功率交换Pbuy1,Psell1,Pbuy2,Psell2，微网1与微网2之间可存在功率交换Pex1,Pex2。

本文建立的微网群以多目标协调优化为目的，其中各个子微网优化目标与总微网群的优化目标一致。微网群优化调度周期取一天，以1h作为一个调度时段，全天共分为24个时段，且算例中采用分时电价a1,a2,b1,b2的方式。

数学模型及详细文章讲解见第4部分。

📚2 运行结果

部分代码：

[best index]=min(fitness);
gtsite=pop; %个体最佳位置
gtfit=fitness; %个体最佳适应度
popsite=pop(index,:); %全局最佳位置
popfit=fitness(index); %全局最佳适应度
trace(1)=popfit;
for k=1:maxgen
w=wmax-(wmax-wmin)/maxgen*j;
for i=1:sizepop
%速度更新
v(i,:)=w*v(i,:)+c*rand*(gtsite(i,:)-pop(i,:))+c*rand*(popsite-pop(i,:));
%限制微粒速度
v(find(v>vmax))=vmax;
v(find(v<vmin))=vmin;
%位置更新
pop(i,:)=pop(i,:)+v(i,:);
%限制微粒位置
pop1=pop(i,1:dim);
pop2=pop(i,dim+1:2*dim);
pop3=pop(i,2*dim+1:3*dim);
pop4=pop(i,3*dim+1:4*dim);
pop5=pop(i,4*dim+1:5*dim);
pop1(find(pop1>popmax(1)))=popmax(1);
pop1(find(pop1<popmin(1)))=popmin(1);
pop2(find(pop2>popmax(2)))=popmax(2);
pop2(find(pop2<popmin(2)))=popmin(2);
pop3(find(pop3>popmax(3)))=popmax(3);
pop3(find(pop3<popmin(3)))=popmin(3);
pop4(find(pop4>popmax(4)))=popmax(4);
pop4(find(pop4<popmin(4)))=popmin(4);
pop5(find(pop5>popmax(5)))=popmax(5);
pop5(find(pop5<popmin(5)))=popmin(5);

pop(i,:)=[pop1 pop2 pop3 pop4 pop5];
for j=1:14
pop(i,dim+j)=0;
pop(i,4*dim+j)=0;
end
pop(i,dim+23)=0;
pop(i,4*dim+23)=0;
pop(i,dim+24)=0;
pop(i,4*dim+24)=0;
for j=1:24
if abs(pop(i,j))>0&&abs(pop(i,j))<10
pop(i,j)=0;

end
%if abs(pop(i,3*dim+j))>0&&abs(pop(i,3*dim+j))<10

% pop(i,3*dim+j)=0;
% end
% if abs(pop(i,dim+j))>0&&abs(pop(i,dim+j))<10
%xudianpin=xudianpin+10000;
% pop(i,dim+j)=0;
%end
if abs(pop(i,4*dim+j))>0&&abs(pop(i,4*dim+j))<10
%xudianpin=xudianpin+10000;
pop(i,4*dim+j)=0;
end
if j<=7|j>=16
pop(i,2*dim+j)=0;
end

end
end
for i=1:sizepop
%计算适应度
%其他参数求解pbuy psell
pex2=-pop(i,2*dim+1:3*dim);
bs1=Load1-pop(i,1:dim)-Ppv1-pop(i,dim+1:2*dim)-Pw1-pop(i,2*dim+1:3*dim);
bs2=Load2-pop(i,3*dim+1:4*dim)-Ppv2-pex2-Pw2-pop(i,4*dim+1:5*dim);