|
|
|
马上加入,结交更多好友,共享更多资料,让你轻松玩转电力研学社区!
您需要 登录 才可以下载或查看,没有账号?立即加入
×
各位大牛,求助啊~~
5 k* n5 g4 R- Y: @3 S2 } M1 c我毕设的题目是交直流混联系统的潮流计算,自己编了交替迭代法的的PQ分解法程序,计算结果与书上算例结果误差最大有12%。8 `+ _4 Y! k, R% n0 z4 h' |: J
于是测试了纯交流部分的程序,也就是一般的PQ法,对照着现代电力系统分析P86上的例子,发现自己程序B1矩阵算到的结果跟书上的有差,致使第一次迭代时相角的修正量跟标准值就差了4%左右。但是查到我程序生成的B1矩阵跟自己手算的结果是一样的啊……
: u( Z% E8 _1 e4 s; d7 j
Y2 u4 l! Q. a3 s2 B* c附上相关部分代码 Ps 我得到的节点导纳矩阵和B2矩阵都是和书上的一样的,真心搞不懂了,求解答啊~~~
: W+ G, a* G) [+ y1 g" Z. n, o4 z
- {2 R- Q: G2 ^" q
function [Bp, Bpp] = makeB(Node,Branch)
* j: _/ b! s$ M2 Q J6 n4 Y/ p1 D/ A. e! o& f% Z( b! l
%% define named indices into node, branch matrices9 \5 ^) Z! @. g
[PQ, PV, REF, ...0 S+ `8 A: i, _+ ?! f& ^. B3 P
TRANS, CAPAC, LINE,...; X: r& {: F$ D/ @1 p
NODE_I, BUS_TYPE,PG,QG, PL, QL, V, THETA, ...! [2 G0 L& c; f2 _! d/ c
BRANCHNUM, NODE1, NODE2, R, X, BORK, BRANCH_TYPE, STATUS, P1, Q1, P2, Q2] = index;: p9 U1 w. s1 R. f) ^% x: ~: }% ^
; U: ~. n6 V9 M1 [%% form index lists for slack, PV, and PQ buses3 N- R3 j W4 _0 U
ref = find(Node(:, 2) == 3); %% reference bus index1 c! ~8 w2 C9 f
pv = find(Node(:, BUS_TYPE) == PV); %% PV bus indices* e8 U `, A) ]- d R, P, _% I
pq = find(Node(:, BUS_TYPE) == PQ); %% PQ bus indices
0 Q7 I* D$ \" }5 Q" }, i3 Z( F
( J; {# ?9 L: T7 i4 ^%*************************************************************************%/ m. y; o* W" R9 f% T: R6 c: j* G/ V
% form Bp
. \" c* P% H$ V0 ^! Q2 ]%*************************************************************************%
' S, k; Q! ^6 e" |# H, g
1 W( l7 t, p0 r# C8 B: x6 `%找出非接地支路/ |" W. W& r9 |9 N5 M+ ]
temp = find( Branch(:,NODE2)~=0 );
+ d& X* N8 R d! v( I; }; n: MNongroundingBranch = Branch(temp,:);4 R. l% ]/ s5 S6 V5 ^
' _) G0 U$ x1 {2 U%忽略线路充电电容3 { s9 d* s: z/ `
NongroundingBranch(:,BORK) = 0;7 ` Y; q* R3 Y2 H& D/ l3 T, `( Q
, @7 C& H! ]. ?2 I3 q' d%不考虑变压器非标准变比9 F+ G$ _6 U# \9 U
temp = find( NongroundingBranch(:,BRANCH_TYPE)==TRANS );0 R: |7 |# P+ [! x& J5 ~
NongroundingBranch(temp,BORK) = 1;
* B7 v- w! h7 L$ Z- QY = makeY(Node,NongroundingBranch);5 C5 {1 O2 P5 D1 J# H9 G
Bp = imag( Y );+ x! I& Y" @: A% X8 p9 s$ ]
Bp = Bp([pq; pv], [pq; pv]) ; % reduce Bp matrices
/ ]2 Y) h1 n3 o$ I% c( K8 W; H0 v6 D' ~3 l
%*************************************************************************%
- y; @4 z% R& b r; C' y% form Bpp
* a$ Y( ]# l4 E5 ]% s8 S6 \%*************************************************************************%+ ~4 Z8 [2 ~; g. S4 r8 M9 o
Branch(:,4)=0;%忽略输电线路电阻
% e/ c) v) H; k1 g) I0 S; \4 mY = makeY(Node,Branch);% z, H$ t, ], W1 n8 b- m
Bpp = imag( Y );
/ B0 O D. P; V0 kBpp = Bpp(pq, pq); % reduce Bp matrices
7 {% F4 g: A0 s3 v. n9 N0 _) }3 |3 G- \, ?; C5 v) j
return; |
|