基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
n = size (W,1);
for i = 1 :n
    l(i)=W(1,i);
    z(i)=1;
end
0 Z& ]' a8 ?  ~  \' g) mi=1;
while i<=n
    for j =1 :n
! O, S* p2 y3 t( C        if l(i)>l(j)+W(j,i)
            l(i)=l(j)+W(j,i);
            z(i)=j;
  ]' N3 s, h( H& |            if j                i=j-1;
            end
        end
    end
    i=i+1;
end
, C+ ?; ~- s! Q% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
! q- k; {; H; I% j2 f- X; w. D%     2     0   Inf     6     1   Inf   Inf   Inf
$ Y( s. g6 S7 P3 }  e: A+ v8 e' e3 l%      1   Inf     0     7   Inf   Inf     9   Inf
%      8     6     7     0     5     1     2   Inf
4 l, L& r2 R# D+ ?%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
%    Inf   Inf     9     2   Inf     4     0     3
: ?( e! [3 W4 x: y4 u; T. F+ @%    Inf   Inf   Inf   Inf     9     6     3     0  ];