|
|
|
马上加入,结交更多好友,共享更多资料,让你轻松玩转电力研学社区!
您需要 登录 才可以下载或查看,没有账号?立即加入
×
各位大牛,求助啊~~4 `4 p7 V) p/ @5 S. m( N9 g: `! L
我毕设的题目是交直流混联系统的潮流计算,自己编了交替迭代法的的PQ分解法程序,计算结果与书上算例结果误差最大有12%。
7 w0 T9 V8 |% f' w# W7 K于是测试了纯交流部分的程序,也就是一般的PQ法,对照着现代电力系统分析P86上的例子,发现自己程序B1矩阵算到的结果跟书上的有差,致使第一次迭代时相角的修正量跟标准值就差了4%左右。但是查到我程序生成的B1矩阵跟自己手算的结果是一样的啊……
9 r. n: ~6 Z5 p! B( ^+ l+ y
3 l" ^& ~ T: R. a6 ~/ `) e7 g, k0 F附上相关部分代码 Ps 我得到的节点导纳矩阵和B2矩阵都是和书上的一样的,真心搞不懂了,求解答啊~~~" l1 f9 K% J6 F& i, q& _
" W" @ }4 G6 H8 z& L+ K9 a
2 O* V8 t6 f) Ofunction [Bp, Bpp] = makeB(Node,Branch)$ J6 k8 u* \' L% R4 T
1 c3 h) g' E4 x0 O$ k2 Y! z+ k' P
%% define named indices into node, branch matrices1 ^4 `9 J- ]5 U" s& A
[PQ, PV, REF, ...
~% A9 K8 f3 ~) |2 w TRANS, CAPAC, LINE,...
" o+ j! u2 V l4 L" l NODE_I, BUS_TYPE,PG,QG, PL, QL, V, THETA, ...
* K+ c1 A& X$ l8 A6 u0 Q8 ^ BRANCHNUM, NODE1, NODE2, R, X, BORK, BRANCH_TYPE, STATUS, P1, Q1, P2, Q2] = index;
: H3 a* X- j7 Y2 ~- ^& p; F) S, F* W
%% form index lists for slack, PV, and PQ buses2 ^; q. w& T& N; A/ D& _9 i4 e" Q
ref = find(Node(:, 2) == 3); %% reference bus index5 I8 Q. {5 u% b" o1 y8 j/ P8 t
pv = find(Node(:, BUS_TYPE) == PV); %% PV bus indices
6 p. t( X) Z% Q: N) epq = find(Node(:, BUS_TYPE) == PQ); %% PQ bus indices
% i7 j. Z6 y* J @
; _7 n& a# h5 h6 f# {$ I" M%*************************************************************************%
- `6 U4 ]+ N% q/ ?$ E1 n" u% i% form Bp
H# s; j+ @6 P6 O& i/ O%*************************************************************************%
/ m4 i$ h# d7 r" k3 o5 O/ N
9 ^* E b/ w# {' D5 V%找出非接地支路# x' c/ \( h$ F4 x1 F; @- t9 O+ l
temp = find( Branch(:,NODE2)~=0 );( D, ?1 |2 Y( F; G
NongroundingBranch = Branch(temp,:);! L* N4 ^, g/ C
. x, a3 N+ N% Q1 g* a5 T7 T
%忽略线路充电电容* d0 f6 R& i5 j0 J
NongroundingBranch(:,BORK) = 0;
* C3 E7 Q, [" k2 Z
7 l5 c6 v# z& i' o1 n%不考虑变压器非标准变比! @( s. C8 ?7 O) X% @& S& z! o
temp = find( NongroundingBranch(:,BRANCH_TYPE)==TRANS );
4 K5 ?, ]) x6 R) h3 Z4 s" DNongroundingBranch(temp,BORK) = 1;4 F- b: x7 V2 U3 |( r4 E
Y = makeY(Node,NongroundingBranch);3 h# `. A3 S7 _9 ] U' W, g8 `
Bp = imag( Y );( a, A" `7 x# V6 R
Bp = Bp([pq; pv], [pq; pv]) ; % reduce Bp matrices( Z M7 V& d' ?
" r5 G: x: {& X, b: ?7 M%*************************************************************************%
* d5 O4 r& t/ Q; }/ {) T0 i% form Bpp
& x7 O9 y( B, w%*************************************************************************%" } R) M) z6 I& N
Branch(:,4)=0;%忽略输电线路电阻; L: x- d' M! G# m! ~& z6 }
Y = makeY(Node,Branch);
8 C0 k0 N0 z7 ~Bpp = imag( Y );3 Y- t/ M- y) k/ h) M' a% m( U
Bpp = Bpp(pq, pq); % reduce Bp matrices
0 q& \" _5 y, R \5 f4 A6 g
+ J6 h3 `' b" A" K7 A, B+ B6 Yreturn; |
|