电力系统牛顿拉夫逊计算机算法潮流计算(Power system Newton rafson computing algorithm trend calculation).docVIP

电力系统牛顿拉夫逊计算机算法潮流计算(Power system Newton rafson computing algorithm trend calculation).doc

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
电力系统牛顿拉夫逊计算机算法潮流计算(Power system Newton rafson computing algorithm trend calculation)

电力系统牛顿拉夫逊计算机算法潮流计算(Power system Newton rafson computing algorithm trend calculation) n =输入(n = 5); 问=输入(“问= 5”); isb =输入(isb = 1); 公关=输入(公关= 0.00001); B1 =输入( B1 =[1 2 03i 0;01.05 0;2 3 0。08 + 0。03i 1 0;2 4 0.1 + 0.35 i 0 1 0;3 4 0。04 + 0。5 i 1 0;3 5 0。5i 0。5i); B2 =输入( B2 =[0。01.05。01.05 0 1;0 3.7 + 1 0 2;0 2 + 1 0 2;0。6 + 0;0;0;0;0;0;0;0;0;0。0;0。0;0。5;0。5;0。5;0。5;0。5; X =输入(X =[1 0;2 0;3 0;5 0]); Y = 0(n),e = 0(1,n);f = 0(1,n);V = 0(1,n);O = 0(1,n);S1 = 0(nl); i = 1:n 如果X ~(我,2)= 0; p = X(1); Y(p,p)= 1. / X(我,2); 结束 结束 因为我= 1:问 如果B1(我1);q = B1(i = 2); 其他p = B1(我2);q = B1(我,1); 结束 (q,p)= Y(p,q)-1. / B1(我,3)* B1(我,5); Y(p,q)= Y(p,q); Y(p,q)= Y(q,q)+ 1. /(B1(我,3)* Bi(我,5)~ 2)+ B1(我,4)。/ 2; Y(p,q)= Y(p,p)+ 1. / Bi(我,3)+ B1(我,4)。2; 结束%求出导纳矩阵 G =实际(Y);B =图像放大(Y); i = 1:n e(i)=实际(B2(我,3)); f(i)=图像放大(B2(我,3)); V(i)= B2(我,4); 结束 i = 1:n (我)= B2(我,1)B2(我,2); (我)= B(我)+ B2(我,5); 结束 P =真正的(S);Q =图像放大(年代); ICT1 = 0;IT2 = 1;没有= 2 * n,n =没有+ 1,= 0; 虽然IT2 ~ = 0 IT2 = 0;= a + 1; i = 1:n 如果我~ =自己的特色 C(i = 0); D(i)= 0; j - 1 = 1:n (我)= C(i)+ G(i,j - 1)* e(j - 1)f - b(i,j - 1)*(j - 1); (我)= D(i)+ G(我,ji)* f(j - 1)+ B(i,j - 1)* e(j - 1); 结束 P1 = C(i)* e(我)+ f(i)* D(我); Q1 = f(我)* C(i)- d(我)* e(i);%求“P,Q” V2 = e(我)~ 2 + f(我)~ 2; 如果B2(我,6)~ = 3 DP = P(i)p1; q1 DQ =问(我); j - 1 = 1:n 如果j - 1 ~ = isbj1 ~ =我 X1 = e - g(i,j - 1)*(i)- b(i,j - 1)* f(我); X2 = B(i,j - 1)* e(i)f - g(i,j - 1)*(我); X3 = X2; X4 = x1; p = 2 *张;q = 2 * j1-1;J(p,q)= X3;J(p,N)= DQ;m = p + 1; J(m,p)= X1;(m,N)= DP;q = q + 1;J(p,q)= X4;J(m q = X2; 如果j - 1 = = ij1 ~ =自己的特色 X1 = - c(i)- g(我)* e(i)- b(我)* f(我); X2 = - d(i)+ B(我)* e(i)f - g(我)*(我); X3 = D(i)+ B(我)* e(i)f - g(我)*(我); X4 = - c(i)+ G(我)* e(i)f + B(我)*(我); p = 2 *张;q = 2 * j1-1;J(p,q)= X3;J(p,N)= DQ;m = p + 1; J(m q = X1;(m,N)= DP;q = q + 1;J(p,q)= X4;J(m q = X2; 结束 结束 其他的 DP = P(i)p1; DV = V(我)~ 2 v2; j - 1 = 1:n 如果j - 1 ~ = isbj1 ~ =我 X1 = e - g(i,j - 1)*(i)- b(i,j - 1)* f(我); X2 = B(i,j - 1)* e(i)f - g(i,j - 1)*(我); X5 = 0; X6 = 0; p = 2 *张;q = 2 * j1-1;J(p,q)=

您可能关注的文档

文档评论(0)

jgx3536 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

版权声明书
用户编号:6111134150000003

1亿VIP精品文档

相关文档