目录

1 主要内容

程序算例

程序模型

程序亮点

2 部分程序

3 部分结果

4 下载链接


主要内容

该程序参考《光热电站促进风电消纳的电力系统优化调度》光热电站模型,主要做的是考虑N-k安全约束的含义风电-光伏-光热电站的电力系统优化调度模型,从而体现光热电站在调度灵活性以及经济性方面的优势。同时代码还考虑了光热电站对风光消纳的作用,对比了含义光热电站和不含光热电站下的弃风弃光问题,同时还对比了考虑N-k约束下的调度策略区别。以14节点和118节点算例为例,对模型进行了系统性的测试,复现效果良好,是学习N-k约束以及光热电站调度的必备程序!程序采用matlab+cplex(mosek/gurobi)进行求解,可以选择已经安装的求解器进行求解。

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

  • 程序算例

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

  • 程序模型

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

  • 程序亮点

  1. 采用光热电站模型,也是最近研究比较热的一个方向。
  2. 采用转移分布因子矩阵处理潮流问题,这也是很多文献中都采用的方法。​

部分程序

clc; clear; close all; % 关闭所有已打开的绘图窗口
%% 参数设定
NT = 24; % 时间范围
CoeffReseve_load = 0.03; 
CoeffReserve_VRE = 0.05; 
yita_TES = 0.98;  
yita_PB = 0.415;  
% 文章里Table 2的数据
Capacity_TES_CSP = 0; 
initial_TES_t0 = 0.5;  
initial_TES_t1 = 0.78;
TES_initial = 0.5;         
beta_Load = 3*10e3;  
    mpc = case14_1; % 载入数据 matpower 数据格式
%% 有功负荷 24h所有节点总的
%    mpc.load = [
%        2842.42  3020.2  3296.96  3444.44  3607.07  3891.91  4070.7  4295.95  4476.76  4661.61  4859.59  5077.77  ...
%        4717.17  4519.19  4301.01  3995.95  3703.03  3806.06  4037.37  4063.63  3721.21  3245.45  3097.97  2827.27
%    ]/6.3; 
​
   mpc.load = [
       683.42  792.2  896.96  1044.44  1087.07  1121.91  1200.7  1235.95  1326.76  1461.61  1489.59  1577.77  ...
       1417.17  1219.19  1101.01  1075.95  903.03  1186.06  1237.37  1463.63  1221.21  1005.45  827.97  807.27
    ]/2; 
​
​
    mpc.P_RE = [0.00   0.00   0.00   0.00   0.00   0.00   15.76   43.17   82.35   109.44   122.55   146.10   ...% PV
                126.66   86.05   60.05   52.82   25.78   4.28   0.00   0.00   0.00   0.00   0.00   0.00  
                100.26   133.95   147.28   134.11   170.52   159.44   138.55   72.83   58.83   73.37   79.90   80.54 ...  % Wind
                91.96   101.68   121.49   122.93   133.11   162.44   130.95   133.25   151.26   139.33   120.60   90.33
                ]*1; % 可再生能源 24小时数据(实际发电量)
%% 电网相关名称
    baseMVA = mpc.baseMVA;
    bus = mpc.bus;
    gen = mpc.gen;
    branch = mpc.branch;
    gencost = mpc.gencost;
    RE = mpc.RE;
    CSP = mpc.CSP;
    P_RE = mpc.P_RE;
​
N = length(bus(:,1));      % 网络中所有节点数
N_Br = length(branch(:,1));% 线路数
N_Gen = length(gen(:,1));  % 火电发电机组数
N_RE = length(RE(:,1));    % 可再生能源节点机组数
N_CSP = length(CSP(:,1));  % CSP发电站数
​
% 常规机组相关数据提取, 取数据矩阵中的列向量 和功率有功的项,均需标幺值化,以便运算和求解
P_Gen_max = gen(:,9)/baseMVA; 
P_Gen_min = gen(:,10)/baseMVA; 
type_Gen = gen(:,22); 
P_Gen_up = gen(:,23) /baseMVA;  
P_Gen_down = gen(:,24) /baseMVA;
T_Gen_min_on = gen(:,25); 
T_Gen_min_off = gen(:,26); 
c_ST_g = gen(:,28);
c_G_g = gen(:,30); 
​
% CSP机组相关数据提取
P_CSP_max = CSP(:,9)/baseMVA; 
P_CSP_min = CSP(:,10)/baseMVA; 
P_CSP_up = CSP(:,23)/baseMVA;   
P_CSP_down = CSP(:,24)/baseMVA; 
T_CSP_min_on = CSP(:,25); 
T_CSP_min_off = CSP(:,26);
c_CSP_g = CSP(:,30);       
​
PtCSP_fore = [ % 可用的太阳能热功率向量 
    0.00   0.00   0.00   0.00   0.00   0.00   190.57   390.57   790.57 990.57   1390.57   1891.03 ...
    2111.64   2200.92   2202.36   2118.26   1895.37   1408.35   0.00   0.00   0.00   0.00   0.00   0.00 ]/20;
PtCSP_fore = PtCSP_fore/baseMVA; 
P_RE = P_RE/baseMVA; % 可再生能源PV WT机组出力
​
beta_Load = beta_Load*baseMVA^2; % $/MWh -> $/p.u.
​
M_bus_G = zeros(N,N_Gen); % 发电机机组-索引矩阵
for row = 1:N
    if abs(find(mpc.gen(:,1) == row)) > 0  % 发电机节点号 与 行号对应
        M_bus_G(row,find(mpc.gen(:,1) == row)) = 1; % M_bus_G相应处置1
    end
end
​
M_bus_RE = zeros(N,N_RE); % 可再生能源机组-索引矩阵
for row = 1:N
    if abs(find(mpc.RE(:,1) == row))>0
        M_bus_RE(row,find(mpc.RE(:,1) == row)) = 1;
    end
end
​
M_bus_CSP = zeros(N,N_CSP); % CSP机组-索引矩阵
for row = 1:N
    if abs(find(mpc.CSP(:,1) == row))>0
        M_bus_CSP(row,find(mpc.CSP(:,1) == row)) = 1;
    end
end
GSDF = makePTDF(mpc); % 发电转移分布因子矩阵,表征节点注入功率在全网络的分布
​
%% 负荷矩阵数据,按照 算例数据mpc.bus(:,3) 中各节点负荷的比例分配
    PD = bus(:,3)/baseMVA; 
    P_factor = PD/sum(PD);
    P_sum = mpc.load/baseMVA; 
    PD = P_factor*P_sum;      
​
%% 决策变量命名
    PG_G = sdpvar(N_Gen,NT,'full');  
    PG_RE = sdpvar(N_RE,NT,'full');   % (风光并网量)
    PG_CSP = sdpvar(N_CSP,NT,'full'); 
    PC_Load = sdpvar(N,NT,'full');   
    
    onoff_gen = binvar(N_Gen,NT,'full');
    onoff_CSP = binvar(N_CSP,NT,'full'); 
    
    Branch = sdpvar(N_Br,NT,'full');   
    Cost_StartUp  = sdpvar(N_Gen,NT-1,'full');
    
    Pt_TES_charge = sdpvar(N_CSP,NT,'full');  
    Pt_TES_discharge= sdpvar(N_CSP,NT,'full');
    Et_TES = sdpvar(N_CSP,NT,'full');         
    
%% 约束条件列写   
    Cons = [];
    for t = 1:NT
        if t >= 2 % type(1-水电, 2-火电机组)
            for i = 1:N_Gen % 火电机组-最小启/停时间约束 式(8-9)
                if (type_Gen(i,1)==2) || (type_Gen(i,1)==5) 
                    for tao = t + 1:min(t+T_Gen_min_on(i,1)-1,NT)   
                        Cons = [Cons, onoff_gen(i,t)-onoff_gen(i,t-1) <= onoff_gen(i,tao)];
                    end
                    for tao = t + 1:min(t+T_Gen_min_off(i,1)-1,NT) 
                        Cons = [Cons, onoff_gen(i,t-1)-onoff_gen(i,t) <= 1-onoff_gen(i,tao)];
                    end
                end
            end
            for i = 1:N_CSP  
                for tao = t+1:min(t+T_CSP_min_on(i,1)-1,NT)
                    Cons = [Cons, onoff_CSP(i,t)-onoff_CSP(i,t-1) <= onoff_CSP(i,tao)]; % CSP机组最小启/停时间约束
                end
                for tao = t+1:min(t+T_CSP_min_off(i,1)-1,NT)
                    Cons = [Cons, onoff_CSP(i,t-1)-onoff_CSP(i,t) <= 1-onoff_CSP(i,tao)];
                end
            end
        end 
        if t >= 2 % 火电机组 爬坡约束 式(6-7)
            Cons = [Cons,  PG_G(:,t) - PG_G(:,t-1) <= ...
                     onoff_gen(:,t-1).* P_Gen_up*60 + ... 
                    (onoff_gen(:,t)-onoff_gen(:,t-1)) .* P_Gen_min + ... 
                    (1-onoff_gen(:,t)) .* P_Gen_max];  
            Cons = [Cons, -PG_G(:,t) + PG_G(:,t-1) <= ...
                    onoff_gen(:,t) .* P_Gen_down*60 + ...
                   (onoff_gen(:,t-1)-onoff_gen(:,t)) .* P_Gen_min + ...  
                   (1-onoff_gen(:,t-1)) .* P_Gen_max];
               
            % CSP 机组 爬坡约束 式(6-7)
            Cons = [Cons,  PG_CSP(:,t) - PG_CSP(:,t-1) <= ...
                     onoff_CSP(:,t-1).* P_CSP_up*60 + ... %  
                     (onoff_CSP(:,t)-onoff_CSP(:,t-1)) .* P_CSP_min + ...
                     (1-onoff_CSP(:,t)) .* P_CSP_max]; 
            Cons = [Cons, -PG_CSP(:,t) + PG_CSP(:,t-1) <= onoff_CSP(:,t) .* P_CSP_down*60 + ...  
                    (onoff_CSP(:,t-1)-onoff_CSP(:,t)) .* P_CSP_min + ...  
                    (1-onoff_CSP(:,t-1)) .* P_CSP_max];
        end
    end
    % 机组出力的上下边界约束-式(3) % t(1-水电,2-火电, 5-燃气发电机组 6-CSP)
  Ind_2_5 = union(find(type_Gen(:,1) == 2),find(type_Gen(:,1) == 5)); 
   Cons = [Cons, onoff_gen(Ind_2_5,:) .* (P_Gen_min(Ind_2_5,1) * ones(1,NT)) ...    
           <= PG_G(Ind_2_5,:) <= ...
          onoff_gen(Ind_2_5,:) .* (P_Gen_max(Ind_2_5,1) * ones(1,NT))];  
        
   
        
    Cons = [Cons, onoff_CSP.*(P_CSP_min*ones(1,NT)) <= PG_CSP <= onoff_CSP.*(P_CSP_max*ones(1,NT))]; % CSP机组出力-边界约束
%     Cons = [Cons, onoff_CSP == ones(1,24)]; % CSP机组 
  
    Cons = [Cons, sum(PG_G,1) + sum(PG_RE,1) + sum(PG_CSP,1) == sum(PD - PC_Load,1)]; % 式(2)
   
    Cons = [Cons, Branch == GSDF*(M_bus_G*PG_G + M_bus_RE*PG_RE + M_bus_CSP*PG_CSP - (PD-PC_Load))]; % 
%     Cons = [Cons, -branch(:,6)*ones(1,NT) <= GSDF*(M_bus_G*PG_G+M_bus_RE*PG_RE+M_bus_CSP*PG_CSP-(PD- PC_Load)) <= branch(:,6)*ones(1,NT)]; % 
    Cons = [Cons, -999*ones(N_Br,NT) <= GSDF*(M_bus_G*PG_G+M_bus_RE*PG_RE+M_bus_CSP*PG_CSP-(PD-PC_Load)) <= 999*ones(N_Br,NT)]; % 118系统有186条线路
   
    Cons = [Cons, 0 <= PG_RE <= P_RE]; % 可再生出力
 
    Cons = [Cons, [60;50;100;80;40]/baseMVA * ones(1,24) <= PG_G ];
  
    Cons = [Cons, 0 <= PC_Load <= PD]; % 式(22)    
  
    Cons = [Cons, sum(onoff_gen .* (P_Gen_max*ones(1,NT)) - PG_G,1) + ...
            sum(onoff_CSP .* (P_CSP_max*ones(1,NT)) - PG_CSP,1) >= ...
            sum(CoeffReseve_load*PD,1) + sum(CoeffReserve_VRE*PG_RE,1) ];
   
    Cons = [Cons, Cost_StartUp >= (onoff_gen(:,2:NT) - onoff_gen(:,1:NT-1)) .* (c_ST_g*ones(1,NT-1))]; % 传统机组启动成本
    Cons = [Cons, Cost_StartUp >= 0];
    
%%%%%% CSP电站运转内部约束 %%%%%%
    E_TES_max = Capacity_TES_CSP * P_CSP_max; 
   
    Cons = [Cons, PG_CSP/yita_PB + Pt_TES_charge - Pt_TES_discharge <= PtCSP_fore]; % CSP输出电功率与TES充/放热功率,预测光热功率关系
  
    Cons = [Cons, Et_TES(:,2:NT) == Et_TES(:,1:NT-1) + Pt_TES_charge(:,1:NT-1)*yita_TES - Pt_TES_discharge(:,1:NT-1)/yita_TES];
  Cons = [Cons, Et_TES(:,1) == TES_initial * E_TES_max]; 
    Cons = [Cons, Et_TES(:,1) == Et_TES(:,NT)];          
   
    Cons = [Cons, 0 <= Pt_TES_charge    <= Capacity_TES_CSP*ones(N_CSP,NT)]; 
    Cons = [Cons, 0 <= Pt_TES_discharge <= Capacity_TES_CSP*ones(N_CSP,NT)];
  
    Cons = [Cons, 0 <= Et_TES <= E_TES_max * ones(1,NT)];
​
%% 目标函数 
    obj = sum(c_G_g'*PG_G) + sum(c_CSP_g'*PG_CSP) + sum(sum(Cost_StartUp) + beta_Load*sum(sum(PC_Load)) ); 
    % 机组的边际发电成本 + 启动成本 + 负荷削减成本
    
    % 运行调度 
    ops = sdpsettings('solver','cplex'); %  gurobi
    ans = optimize(Cons,obj,ops)
    
%% 求解成功后取值
  PG_G = value(PG_G)  ; 
    PG_RE = value(PG_RE) ;  
    PG_CSP = value(PG_CSP) ; 
    PC_Load = value(PC_Load) ;   
    onoff_gen = value(onoff_gen) ; 
    onoff_CSP = value(onoff_CSP) ; 
    Branch = value(Branch) ;   
    Cost_StartUp  = value(Cost_StartUp);
    obj = value(obj); % 总成本
    Pt_TES_charge = value(Pt_TES_charge);   
    Pt_TES_discharge = value(Pt_TES_discharge); 
    Et_TES = value(Et_TES);                 
    
disp(['IEEE14 不考虑N-k的和无CSP的经济调度情况,运行成本为 ', num2str(obj)])
%% 绘图 
% 已知的相关输入数据
    figure
    subplot(3,1,1)
    plot(PtCSP_fore * baseMVA,'m-o');
  title('CSP预测功率值')
  xlabel('时间(h)');
    ylabel('功率(MW)');
    
    subplot(3,1,2)
    plot(P_RE(1,:) * baseMVA,'m-o'); hold on
    plot(P_RE(2,:) * baseMVA,'b-s');
  title('可再生能源预测出力值')
  xlabel('时间(h)');
    ylabel('功率(MW)');
    legend('光伏','风电')
    
    subplot(3,1,3)
    plot(sum(PD) * baseMVA,'r-v');
  title('24h负荷值')
  xlabel('时间(h)');
    ylabel('功率(MW)');
    
    
​
    
%    subplot(2,1,2)
%  bar(baseMVA*PG_RE',0.75,'stack'); hold on; % 各PV、Wind机组出力
%    legend('PV','Wind')
%    title('电网中可再生能源机组出力')
%  xlabel('时间(h)');
%    ylabel('功率(MW)');
    
%    figure
%    surf(baseMVA*PC_Load);
%    title('负荷削减量')
%  xlabel('时间(h)');
%    ylabel('功率(MW)');
​
​

部分结果

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

Matlab|含风电-光伏-光热电站电力系统N-k安全优化调度模型-LMLPHP

4 下载链接

04-13 23:28