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

14 lines
458 B
Mathematica
Raw Normal View History

只加一个QD的收敛了，准备加所有QD。 Signed-off-by: unknown <dmy@dmy-PC.(none)>
2012-11-04 12:37:11 +08:00
function Mat_H=FormH(Busnum,Volt,PG,PD,QG,QD,Y,UAngel,r,c,Angle,QD_NON_ZERO,QD_NON_ZERO_IND,Loadi)
用功率因数计算QD，收敛良好。 Signed-off-by: facat <dmy@dmy-PC.(none)>
2012-05-24 10:07:18 +08:00
%%
更改路径 Signed-off-by: unknown <dmy@dmy-PC.(none)>
2012-09-04 11:10:39 +08:00
%QDcos=textread('D:\Project\<EFBFBD><EFBFBD>С<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<EFBFBD><EFBFBD>С<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>\<EFBFBD>ɺ<EFBFBD>919PDQDglys.txt');
加错误数据识别 Signed-off-by: facat <dmy@dmy-PC.(none)>
2012-07-25 15:08:54 +08:00
%QD(QD~=0)=PD(QD~=0)./tan(QDcos);
随机测试缺负荷 Signed-off-by: facat <dmy@dmy-PC.(none)>
2012-06-06 10:19:08 +08:00
%QD(QD_NON_ZERO_IND)=QD_NON_ZERO;
用功率因数计算QD，收敛良好。 Signed-off-by: facat <dmy@dmy-PC.(none)>
2012-05-24 10:07:18 +08:00
%%
只加一个QD的收敛了，准备加所有QD。 Signed-off-by: unknown <dmy@dmy-PC.(none)>
2012-11-04 12:37:11 +08:00
%PD(Loadi)=QD(Loadi)./tan(acos(0.98));
已全部稀疏化 Signed-off-by: facat <dmy@dmy-PC.(none)>
2012-05-24 10:34:04 +08:00
AngleIJ=sparse(r,c,UAngel(r)-UAngel(c)-Angle',Busnum,Busnum);
original.not modified.
2012-05-22 11:33:21 +08:00
dP=PG-PD-diag(Volt)*Y.*cos(AngleIJ)*Volt';
dQ=QG-QD-diag(Volt)*Y.*sin(AngleIJ)*Volt';
已全部稀疏化 Signed-off-by: facat <dmy@dmy-PC.(none)>
2012-05-24 10:34:04 +08:00
original.not modified.
2012-05-22 11:33:21 +08:00
Mat_H=[dP;dQ;];
end