function OutResult(e,f,T,k,Gap,fx,transI,transJ,filename,nodeNum,PGR,pgNode,QR,pvNode,capI,capK,firstfx,firstT,firstcapK,Tn,Tn1,... capKn,capKn1,ifconverge,max_hx,G,B,balNode,toc,firstV,capBi) %程序功能:输出计算结果 %编写时间:2010年10月 Y1=G+1j*B; V1=e+1j*f; NodeS=zeros(nodeNum,1); NodeS(pvNode)=V1(pvNode,:).*conj(Y1(pvNode,:)*V1); %计算平衡节点和PV节点的节点复功率,Y1(pvNode,:)*V1为节点的注入电流 balanceP=real(NodeS(balNode,1)); %获取平衡节点的有功功率 PGR(balNode,1)=balanceP; balanceQ=imag(NodeS(balNode,1)); QR(balNode,1)=balanceQ; resultFile=['result_' filename]; fid=fopen(resultFile,'w'); result=[k;Gap;fx;firstfx;toc;max_hx;ifconverge]; %收敛信息 fprintf(fid,'%2.0f %4.4e %6.6f %6.6f %4.4f %4.4e %2.0f\r\n',result); fprintf(fid,'%1.0f\r\n',0); trans=[transI';transJ';(1./T)';(1./firstT)';(1./Tn)';(1./Tn1)']; %变压器变比结果 fprintf(fid,'%2.0f %2.0f %5.4f %5.4f %5.4f %5.4f\r\n',trans); fprintf(fid,'%1.0f\r\n',0); nn=1:nodeNum; e=full(e); f=full(f); V=sqrt(e.^2+f.^2); Vresult=[nn;e';f';V';firstV']; %节点电压结果 fprintf(fid,'%3.0f %5.4f %5.4f %5.4f %5.4f\r\n',Vresult); fprintf(fid,'%1.0f\r\n',0); PGresult=[pgNode';PGR(pgNode)']; %有功出力结果 PGresult=full(PGresult); fprintf(fid,'%2.0f %4.4f\r\n',PGresult); fprintf(fid,'%1.0f\r\n',0); QRresult=[pvNode';QR(pvNode)']; %无功出力结果 QRresult=full(QRresult); fprintf(fid,'%2.0f %4.4f\r\n',QRresult); fprintf(fid,'%1.0f\r\n',0); capK=capK.*capBi; capKn=capKn.*capBi; capKn1=capKn1.*capBi; Capresult=[capI';capK';firstcapK';capKn';capKn1']; %电容电抗器投入组数结果 Capresult=full(Capresult); fprintf(fid,'%2.0f %3.2f %5.4f %3.2f %3.2f\r\n',full(Capresult)); fprintf(fid,'%1.0f\r\n',0); fclose(fid);