%floydSPR算法
%a-賦權(quán)鄰接矩陣
%D-為距離矩陣
%R-最短路徑矩陣
%By?GreenSim?Group
function?[DR]=floydSPR（a）
n=size（a1）;
D=a;
R=zeros（nn）;
for?i=1:n
????for?j=1:n
????????if?D（ij）~=inf
????????????R（ij）=j;
????????end
????end
end
for?k=1:n
????for?i=1:n
????????for?j=1:n
????????????if?D（ik）+D（kj）????????????????D（ij）=D（ik）+D（kj）;
????????????????R（ij）=R（ik）;
????????????end
????????end
????end
end

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????文件?????????444??2010-05-29?17:01??弗洛伊德?算法matlab\floydSPR.m
?????目錄???????????0??2012-07-30?23:06??弗洛伊德?算法matlab\