function?pop?=?Add_Weight（）
tic
pop_numb?=?600;
Step_lanbda?=?1?/?pop_numb;
SumQg?=?[];
Only_PLoss?=?[];
setMinDistance?=?0.0001;
setMaxDistance?=?0.0003;
lanbda?=?0?;
k?=?2;
??[SumQg（1）Only_PLoss（1）]?=?IPM_MainCalculation（lanbda）;
while?lanbda?<=?1
???lanbda?=?lanbda?+?Step_lanbda;
???[SumQg（k）Only_PLoss（k）]?=?IPM_MainCalculation（lanbda）;
???pop?=?[SumQg‘Only_PLoss‘];
???if?sqrt（?（SumQg（k）?-?SumQg（k-1））^2?+?（?Only_PLoss（k）?-?Only_PLoss（k-1））^2?）?????k?=?k?-?1;
???elseif?sqrt（?（SumQg（k）?-?SumQg（k-1））^2?+?（?Only_PLoss（k）?-?Only_PLoss（k-1））^2?）?>?setMaxDistance??????
????????k?=?k?-?1;????????????
???end??
???k?=?k?+?1;????????
end
[ab]?=?size（pop）
figure?（3）;
plot（SumQgOnly_PLoss?‘o-‘）;
xlabel（‘發(fā)電機(jī)無(wú)功出力‘）;ylabel（‘網(wǎng)損‘）;
toc

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件????????792??2012-11-14?15:06??切線逼近法\Add_Weight.m

?????文件???????6169??2012-01-07?21:49??切線逼近法\EqualHeisenMatrix.m

?????文件???????2063??2012-10-28?17:11??切線逼近法\EqualJacobiMatrix.m

?????文件???????1538??2012-01-07?21:49??切線逼近法\FormGB_former.m

?????文件???????3081??2012-10-28?23:18??切線逼近法\Form_IPM_data14.m

?????文件???????2380??2012-10-28?23:18??切線逼近法\GradsHeisenMatrix.m

?????文件????????893??2012-10-28?21:48??切線逼近法\GradsMatrix.m

?????文件????????195??2012-01-07?21:49??切線逼近法\InequalJacobiMatrix.m

?????文件???????8456??2012-10-29?09:54??切線逼近法\IPM_MainCalculation.m

?????文件????????508??2012-01-07?21:49??切線逼近法\ModifyNodeValue.m

?????文件????????563??2012-10-28?22:12??切線逼近法\PLoss_Calculation.m

?????文件???????5915??2012-10-28?15:22??切線逼近法\Power_Calculation.m

?????文件???????3115??2012-10-28?15:00??切線逼近法\RE_IEEE14_data.m

?????文件????????625??2012-01-07?21:49??切線逼近法\v14.m

?????目錄??????????0??2012-11-02?09:57??切線逼近法

-----------?---------??----------?-----??----

????????????????36293????????????????????15