function?A=admatrix（LNlinen）
%forming?admittance?matrix
%??LN?is?the?parameters?of?branch;line?is?serial?number?after?optimization;
%??n?is?number?of?buses.
A=zeros（n）;
for?i=1:length（LN（:1））
????for?j=1:n
????????if?LN（i1）==line（j）
????????????LN（i1）=j;
????????????break;
????????end
????end
????for?j=1:n
????????if?LN（i2）==line（j）
????????????LN（i2）=j;
????????????break;
????????end
????end
????%above?adjust?the?sequence?of?line?bus
????if?LN（i6）==0
????????A（LN（i1）LN（i2））=A（LN（i1）LN（i2））-1/complex（LN（i3）LN（i4））;
????????A（LN（i2）LN（i1））=A（LN（i1）LN（i2））;
????????A（LN（i1）LN（i1））=A（LN（i1）LN（i1））+1/complex（LN（i3）LN（i4））-complex（0LN（i5））;
????????A（LN（i2）LN（i2））=A（LN（i2）LN（i2））+1/complex（LN（i3）LN（i4））-complex（0LN（i5））;
????else
????????A（LN（i1）LN（i2））=A（LN（i1）LN（i2））-1/（complex（LN（i3）LN（i4））*LN（i5））;
????????A（LN（i2）LN（i1））=A（LN（i1）LN（i2））;
????????A（LN（i1）LN（i1））=A（LN（i1）LN（i1））+1/complex（LN（i3）LN（i4））;
????????A（LN（i2）LN（i2））=A（LN（i2）LN（i2））+1/（complex（LN（i3）LN（i4））*LN（i5）^2）;
????end
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????360??2011-01-28?21:15??使用說明.txt

?????文件????????513??2010-12-07?20:49??matlab程序\003th.txt

?????文件???????1104??2010-12-07?15:32??matlab程序\009th.txt

?????文件???????7786??2010-12-14?13:39??matlab程序\039th.txt

?????文件???????1112??2011-01-25?21:48??matlab程序\admatrix.m

?????文件???????1028??2011-01-27?16:29??matlab程序\detriangle.m

?????文件???????3040??2011-01-28?21:10??matlab程序\exportresult.m

?????文件???????4229??2011-01-25?20:52??matlab程序\importdata.m

?????文件???????1209??2011-01-26?11:30??matlab程序\initialization.m

?????文件???????2545??2011-01-25?22:06??matlab程序\jacabiforming.m

?????文件????????530??2011-01-28?18:32??matlab程序\nagauss.m

?????文件???????1494??2011-05-24?20:26??matlab程序\nodeoptimization.m

?????文件???????1610??2011-01-26?11:50??matlab程序\powercalculation.m

?????文件???????1413??2011-07-20?11:12??matlab程序\rulerpf.asv

?????文件???????1431??2011-07-20?14:36??matlab程序\rulerpf.m

?????文件???????7222??2011-07-21?15:20??matlab程序\SolveResult.txt

?????文件????????419??2011-01-25?22:20??matlab程序\trianglesolve.m

?????文件?????139776??2008-03-01?05:37??原始數據\003_bus\003readme.doc

?????文件????????513??2008-03-01?05:37??原始數據\003_bus\th\003thdat.dat

?????文件????????221??2008-03-01?05:37??原始數據\003_bus\th\003thmac.dat

?????文件????????313??2008-03-01?05:37??原始數據\003_bus\th\003thres.dat

?????文件??????68096??2010-12-06?13:29??原始數據\009_bus\009readme.doc

?????文件???????1104??2008-03-01?05:37??原始數據\009_bus\th\009thdat.dat

?????文件????????265??2008-03-01?05:37??原始數據\009_bus\th\009thmac.dat

?????文件????????679??2008-03-01?05:37??原始數據\009_bus\th\009thres.dat

?????文件?????125440??2010-12-06?13:30??原始數據\039_bus\039readme.doc

?????文件???????7786??2008-03-01?05:37??原始數據\039_bus\th\039thdat.dat

?????文件????????654??2008-03-01?05:37??原始數據\039_bus\th\039thmac.DAT

?????文件???????2662??2008-03-01?05:37??原始數據\039_bus\th\039thres.DAT

?????文件??????91136??2011-01-27?20:13??th數據格式說明.doc

............此處省略12個文件信息