利用matlab基础语法实现牛顿法潮流计算

问题描述

现代电力系统分析课程留了用计算机进行潮流计算的作业,可以使用各种软件实现,matlab就包含在其中,按老师的意思应该是使用matlab中的某个app。
可是我头铁,app是什么,当然要自己写啊!
以此题为例题目来自于 电力系统分析教材 华中科技大学版

整体思路

根据Y阵,PQ节点的P、Q值,PV节点的P、V值,平衡节点的δ、V值,利用极坐标的牛顿法,求出每个节点的δ、V值和P、Q值,和ΔP、ΔQ值,根据ΔP、ΔQ值判断是否收敛,同时得出下一个P、Q值,反复迭代求解。

具体步骤

  1. 输入Y阵Ymat,PQ、PV节点参数Ps、Qs、Ps、V,平衡节点参数,此为目标值。
  2. 给出初始V、δ值,其中V节点、平衡节点为1中的值,在迭代过程中不再变化。
  3. 根据δ、U值求其对应的P、Q值。
  4. 根据P、Q、δ、V、Ymat求Jacobi矩阵J。
  5. 将复数矩阵Ymat进行分离,实部组成G阵,虚部组成B阵。根据如下公式计算J阵。
    H i i = { − V i V j ( G i j s i n δ i j − B i j c o s δ i j ) i ≠ j V i 2 B i i + Q i i = j N i j = { − V i V j ( G i j c o s δ i j + B i j s i n δ i j ) i ≠ j − V i 2 G i i − P i i = j K i j = {     V i V j ( G i j c o s δ i j + B i j s i n δ i j ) i ≠ j V i 2 G i i − P i i = j L i j = { − V i V j ( G i j s i n δ i j − B i j c o s δ i j ) i ≠ j V i 2 G i i − Q i i = j J = [ H N K L ] , H_{ii}= \left\{\begin{matrix} -V_{i}V_{j}(G_{ij}sin \delta_{ij}-B_{ij}cos \delta_{ij}) &i\neq j \\ V_{i}^{2}B_{ii}+Q_{i} &i= j \end{matrix}\right.\\ N_{ij}= \left\{\begin{matrix} -V_{i}V_{j}(G_{ij}cos \delta_{ij}+B_{ij}sin \delta_{ij}) &i\neq j \\ -V_{i}^{2}G_{ii}-P_{i} &i= j \end{matrix}\right.\\ K_{ij}= \left\{\begin{matrix} \ \ \ V_{i}V_{j}(G_{ij}cos \delta_{ij}+B_{ij}sin \delta_{ij}) &i\neq j \\ V_{i}^{2}G_{ii}-P_{i} &i= j \end{matrix}\right.\\ L_{ij}= \left\{\begin{matrix}- V_{i}V_{j}(G_{ij}sin \delta_{ij}-B_{ij}cos \delta_{ij}) &i\neq j \\ V_{i}^{2}G_{ii}-Q_{i} &i= j \end{matrix}\right.\\ J=\begin{bmatrix} H &N \\ K&L \end{bmatrix}, Hii={ViVj(GijsinδijBijcosδij)Vi2Bii+Qii̸=ji=jNij={ViVj(Gijcosδij+Bijsinδij)Vi2GiiPii̸=ji=jKij={   ViVj(Gijcosδij+Bijsinδij)Vi2GiiPii̸=ji=jLij={ViVj(GijsinδijBijcosδij)Vi2GiiQii̸=ji=jJ=[HKNL],
  6. 根据Ps与P,Qs与Q的差求出修正量DP、DQ。
  7. 根据J阵与DP、DQ,利用牛顿法公式 [ Δ P Δ Q ] = − J [ Δ δ V D 2 − 1 Δ V ] , 其 中 : V D 2 = [ V 1 V 2 . . . V m ] \begin{bmatrix}\Delta P\\ \Delta Q\end{bmatrix}=-J\begin{bmatrix}\Delta \delta\\V_{D_{2}}^{-1} \Delta V \end{bmatrix},其中:V_{D_{2}}=\begin{bmatrix}V_{1}\\ & V_{2}\\&&...\\&&&V_{m} \end{bmatrix} [ΔPΔQ]=J[ΔδVD21ΔV],:VD2=V1V2...Vm求Δδ、ΔV。
  8. 根据Δδ、ΔV、δ、V求得下一个δ、V。
  9. 重复3~8。


程序代码

%chaoliujtz.m

%季天泽
%华中科技大学电气与电子工程学院
%强电磁与新技术国家重点实验室
clear
clc

%   节点必须按照PQ、PV、平衡节点来排序
%   PQ节点有m个,共有n+1个节点,即PV节点有n-m个
%   每个PQ节点有1个关于Q的方程式,每个PV或PQ节点有1个关于P的方程式,平衡节点没有方程式
%   所以P有n行,Q有m行,U与δ有n+1行

Ymat=[
    1.042093-i*8.242876      -0.588235+i*2.352941     i*3.666667       -0.453858+i*1.891074
    -0.588235+i*2.352941     1.069005-i*4.727377      0               -0.480769+i*2.403846
    i*3.666667               0                       -i*3.333333      0
    -0.453858+i*1.891074     -0.480769+i*2.403846     0               0.934627-i*4.261590
    ];
z=max(size(Ymat));
%Ps、Qs代表实际的P、Q
Ps(1)=-0.3;
Ps(2)=-0.55;
Ps(3)=0.5;
Qs(1)=-0.18;
Qs(2)=-0.13;
n=size(Ps);
m=size(Qs);
n=n(2);
m=m(2);
%delta=[ones(1,10)*-1,0]
delta(z)=0;
%输入U时,注意PV节点和平衡节点直接输入的是目标值的标幺值,而PQ节点输入的仅是迭代初值
U=[1,1,1.1,1.05];
output=[];
error=[];
G=real(Ymat);
B=imag(Ymat);
for ii=1:500
    p1=(U*(G.*cos(delta-delta')+B.*sin(delta-delta')));
    q1=(U*(G.*sin(delta-delta')-B.*cos(delta-delta')));
    P=U(1:n).*p1(1:n);
    Q=U(1:m).*q1(1:m);
    clear p1 q1;
    DP=Ps-P;
    DQ=Qs-Q;
    J = Jacobi(P,Q,Ymat,U,delta);
    invJ=inv(J);
    %修正方程
    M=-invJ*[DP';DQ'];
    Ddelta=M(1:n)';
    DU=(diag(U(1:m))*M(n+1:m+n))';
    Ddelta(n+1)=0;
    DU(n+1)=0;
    delta=delta+Ddelta;
    U=U+DU;
    error=[error;[DP,DQ,DU]];
    output=[output;U,delta];
end
plot(1:500,output)
%Jacobi.m


function J = Jacobi(P,Q,Y,U,delta)
%   U,Y,S都是复矩阵,获取之后进行拆分,m为PQ节点的个数,n为节点总数,n-1-m为PV节点数
%   此处显示详细说明
%   节点按照PQ、PV、平衡节点来排序
%   PQ节点有m个,共有n+1个节点,即PV节点有n-m个
%   每个PQ节点有1个关于Q的方程式,每个PV或PQ节点有1个关于P的方程式,平衡节点没有方程式
%   所以P有n行,Q有m行
n=size(P);
m=size(Q);
n=n(2);
m=m(2);
G=real(Y);
B=imag(Y);
Q(n+1)=0;
P(n+1)=0;
for i=1:n
    for j=1:n
        if i~=j
            H(i,j)=-U(i)*U(j)*(G(i,j)*sin(delta(i)-delta(j))-B(i,j)*cos(delta(i)-delta(j)));
        elseif i==j
            H(i,j)=U(i)*U(j)*B(i,j)+Q(i);
        end
    end
end
for i=1:n
    for j=1:m
        if i~=j 
            N(i,j)=-U(i)*U(j)*(G(i,j)*cos(delta(i)-delta(j))+B(i,j)*sin(delta(i)-delta(j)));
        elseif i==j
            N(i,j)=-U(i)*U(j)*G(i,j)-P(i);
        end
    end
end
for i=1:m
    for j=1:n
        if i~=j 
            K(i,j)=U(i)*U(j)*(G(i,j)*cos(delta(i)-delta(j))+B(i,j)*sin(delta(i)-delta(j)));
        elseif i==j
            K(i,j)=U(i)*U(j)*G(i,j)-P(i);
        end
    end
end
for i=1:m
    for j=1:m
        if i~=j 
            L(i,j)=-U(i)*U(j)*(G(i,j)*sin(delta(i)-delta(j))-B(i,j)*cos(delta(i)-delta(j)));
        elseif i==j
            L(i,j)=U(i)*U(j)*B(i,j)-Q(i);
        end
    end
end 
J=[
    H, N;
    K, L
   ];
  • 17
    点赞
  • 92
    收藏
    觉得还不错? 一键收藏
  • 3
    评论
评论 3
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值