基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
n = size (W,1);
. |0 q, V9 r% B! F; Ofor i = 1 :n
    l(i)=W(1,i);
    z(i)=1;
end
  x" h: b6 T4 O5 p! Z% ei=1;
while i<=n
0 V' H6 b) {+ z4 i6 ~' @    for j =1 :n
        if l(i)>l(j)+W(j,i)
1 N+ F1 p: e& g( v2 _( O            l(i)=l(j)+W(j,i);
; x$ f$ @; r( Z# |+ ~            z(i)=j;
: r7 e/ T  W+ v' ^4 A            if j                i=j-1;
            end
        end
    end
0 o, E0 Z1 T( E5 |4 v" T    i=i+1;
end
% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
%     2     0   Inf     6     1   Inf   Inf   Inf
2 P, E0 V3 Y% o%      1   Inf     0     7   Inf   Inf     9   Inf
: d* m% ]; A$ n%      8     6     7     0     5     1     2   Inf
% D$ V, e, M, V%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
%    Inf   Inf     9     2   Inf     4     0     3
, H+ J% f  j1 h4 u  a%    Inf   Inf   Inf   Inf     9     6     3     0  ];