function?T1=changes（pti）?%%%?網絡結構分層顯示
T1=[];
for?i=1:size（p1）
????for?j=1:size（p2）
????????if?p（ij）==1
????????????T1=[T1;ij];?%T1?為矩陣?p?中元素?1?所處位置組成的矩陣%
????????end
????end
end
if?ti==1
????for?k1=1:6
????????for?k2=k1+1:6
????????????if?T1（k11）-T1（k21）==0;
????????????????a=T1（k21）
????????????????T1（k21）=T1（k22）;
????????????????T1（k22）=a;?%同一行中兩元素位置互換%
????????????end
????????end
????end
????for?k1=1:6
????????for?k2=k1+1:6
????????????if?T1（k11）-T1（k21）==0;?
????????????????%元素互換后，矩陣若仍存在：?T1（k11）==T1（k21）
????????????????%?（k1????????????????a=T1（k11）
????????????????T1（k11）=T1（k12）;
????????????????T1（k12）=a;
????????????end
????????end
????end
????[cpos]=sort（T1（:2））;?%%?第二列元素升序排列并與第一列元素互換位置?%%
????T1=T1（pos:）;
????B=T1（:1）;
????T1（:1）=T1（:2）;
????T1（:2）=B?;
else
????return;
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????5738??2018-05-09?17:26??PSO\PSO.m
?????文件????????1512??2018-05-09?10:36??PSO\Tree.m
?????文件?????????959??2018-05-09?19:47??PSO\changes.m
?????文件?????????240??2018-05-08?20:20??PSO\f03.m
?????文件?????????774??2018-05-08?20:21??PSO\f05.m
?????文件?????????514??2018-05-08?20:22??PSO\fuzhi.m
?????文件????????2221??2018-05-09?17:24??PSO\qthd.m
?????目錄???????????0??2018-05-09?16:53??PSO\