facat/pes2014
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

用功率因数计算QD，收敛良好。

Browse Source 
Signed-off-by: facat <dmy@dmy-PC.(none)>
This commit is contained in:
facat
2012-05-24 10:07:18 +08:00
parent af1ea37c41
commit ca24c4f8d5
7 changed files with 480 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
FormH.m
View File

@@ -1,4 +1,4 @@
function Mat_H=FormH(Busnum,GB,AngleIJMat,Volt,PG,PD,QG,QD,Y)
function Mat_H=FormH(Busnum,GB,AngleIJMat,Volt,PG,PD,QG,QD,Y,QD_NON_ZERO,QD_NON_ZERO_IND)
t1=real(GB).*cos(AngleIJMat)+imag(GB).*sin(AngleIJMat);
t2=Volt'*Volt;
t3=t1.*t2;
@@ -12,6 +12,11 @@ t9=QG-QD;
Mat_H(1:2:2*Busnum)=t8(1:Busnum)+t4(1:Busnum);
Mat_H(2:2:2*Busnum)=t9(1:Busnum)+t7(1:Busnum);
Mat_H=Mat_H';
%%
QDcos=textread('1047glys.txt');
QD(QD~=0)=PD(QD~=0)./tan(QDcos);
QD(QD_NON_ZERO_IND)=QD_NON_ZERO;
%%
%%%%一下是学姐给的公式
AngleIJ=AngleIJMat-angle(GB);
%dP=PG-PD-diag(Volt)*Y*cos(AngleIJ)*Volt';