基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
/ e6 l' G, w  f  D+ ^7 [n = size (W,1);
+ c/ I% p$ ?- M6 ~+ s/ @4 I- O; R( Ffor i = 1 :n
    l(i)=W(1,i);
& m$ O& |8 @) e$ O3 `0 J, D1 s    z(i)=1;
- |/ Z$ H+ g% a6 z. W4 Q$ @end
i=1;
while i<=n
+ h, E" d' J8 S$ X) `% `- N/ s    for j =1 :n
        if l(i)>l(j)+W(j,i)
; f+ M' y$ M5 J" H* ^            l(i)=l(j)+W(j,i);
            z(i)=j;
, w7 T) Q* i% \9 M" H. _            if j                i=j-1;
            end
' s9 a7 y" E5 X/ L/ p9 p2 |        end
    end
) i$ N8 b) X- B% _; n    i=i+1;
end
% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
%     2     0   Inf     6     1   Inf   Inf   Inf
%      1   Inf     0     7   Inf   Inf     9   Inf
%      8     6     7     0     5     1     2   Inf
( i7 x2 R/ H1 u9 Z%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
1 F  ^; V- V# f, r2 w. ]2 ]%    Inf   Inf     9     2   Inf     4     0     3
%    Inf   Inf   Inf   Inf     9     6     3     0  ];