|
|
|
马上加入,结交更多好友,共享更多资料,让你轻松玩转电力研学社区!
您需要 登录 才可以下载或查看,没有账号?立即加入
×
[讨论] 求助~~PQ法B1矩阵的形成
+ c" C; x% N+ S; H* I
3 X/ C* Y6 o8 H" |! X$ g/ J+ [0 M$ ^求助, PQ分解法' M0 D+ |5 F& N; `( |& ~+ X) k6 ?
各位大牛,求助啊~~
# x! g. J' i4 ]( t2 f# e我毕设的题目是交直流混联系统的潮流计算,自己编了交替迭代法的的PQ分解法程序,计算结果与书上算例结果误差最大有12%。7 E4 t1 @/ D$ ^2 I7 I. D
于是测试了纯交流部分的程序,也就是一般的PQ法,对照着现代电力系统分析P86上的例子,发现自己程序B1矩阵算到的结果跟书上的有差,致使第一次迭代时相角的修正量跟标准值就差了4%左右。但是查到我程序生成的B1矩阵跟自己手算的结果是一样的啊……
# {5 [- h: _2 u8 r1 d# L5 r' O$ o, x! D
附上相关部分代码 Ps 我得到的节点导纳矩阵和B2矩阵都是和书上的一样的,真心搞不懂了,求解答啊~~~
& k1 `1 O0 T# s: @; B1 s2 u! u7 x6 `- g0 y
: a6 _) L" Z6 l. Lfunction [Bp, Bpp] = makeB(Node,Branch)5 Y1 ]/ V" X: q$ V! H
, e/ h- {1 |' B( x' _) B%% define named indices into node, branch matrices; w: K( L3 T1 A) ?9 q$ f. E. J
[PQ, PV, REF, ...1 U5 G L- a' h% D: f
TRANS, CAPAC, LINE,...
- U* L5 ^; n8 E X8 R5 A% _4 Q8 n NODE_I, BUS_TYPE,PG,QG, PL, QL, V, THETA, ...1 ^- n& `2 r- j3 ~0 H1 S* f
BRANCHNUM, NODE1, NODE2, R, X, BORK, BRANCH_TYPE, STATUS, P1, Q1, P2, Q2] = index; k1 u/ e- W9 |# b8 F
$ o2 ?$ ]+ k0 {1 S; g% s5 L- [4 N
%% form index lists for slack, PV, and PQ buses+ P! _) U/ T% W4 Q
ref = find(Node(:, 2) == 3); %% reference bus index- o$ X$ Q3 E" M/ g
pv = find(Node(:, BUS_TYPE) == PV); %% PV bus indices" j" M, \, f/ u5 G" s0 t
pq = find(Node(:, BUS_TYPE) == PQ); %% PQ bus indices I; E, t- P% a4 ?, p, v. }
" f+ g$ @+ { d \: B% ` a%*************************************************************************%, F6 I8 c: T* o0 d1 N- ]( H
% form Bp4 b1 G3 _) F! ]: x' k4 V/ f
%*************************************************************************%$ [6 z/ V; W+ c$ } o5 m% ?
( a- }- F" ^1 f) J
%找出非接地支路4 h1 p" p; N5 @/ p! M6 u. J/ I
temp = find( Branch(:,NODE2)~=0 );3 G Q& s9 {, B* K* W
NongroundingBranch = Branch(temp,:);. q: y; a% M- a; K6 n h. a
3 \! w. A9 C2 a) y" [# W%忽略线路充电电容
9 ~' o% _' y1 N8 ~NongroundingBranch(:,BORK) = 0;
, M* c8 l$ m- G5 B% U1 ~" a( `* A
' ~& K- O+ p" M" K" i2 I%不考虑变压器非标准变比4 g- J. F0 P- P9 s7 u5 r
temp = find( NongroundingBranch(:,BRANCH_TYPE)==TRANS );
/ B. H" U) o5 D( NNongroundingBranch(temp,BORK) = 1;$ k" y! j/ }( `; h1 r6 {
Y = makeY(Node,NongroundingBranch);& h7 j, j$ _3 p- ^; [7 u
Bp = imag( Y );
6 |, y' A0 O& q. B* Z' q! y* tBp = Bp([pq; pv], [pq; pv]) ; % reduce Bp matrices" }" j; @. u- F* m) j2 l0 J s
- I- v B# S1 X%*************************************************************************%4 N$ K% T; `- t# u
% form Bpp7 \. u+ t+ c* ^* P; x
%*************************************************************************%
# ]& `8 a4 P( b5 ^' PBranch(:,4)=0;%忽略输电线路电阻
8 }; C* M7 h( ^: x1 @Y = makeY(Node,Branch);7 C" b1 N& N8 {" J
Bpp = imag( Y );
2 a" `1 f, |1 N- NBpp = Bpp(pq, pq); % reduce Bp matrices |
|