基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
n = size (W,1);
( H7 g$ ~8 ~( ]5 A2 lfor i = 1 :n
    l(i)=W(1,i);
    z(i)=1;
end
i=1;
  I: Q6 v; ^  Y2 N2 h! Pwhile i<=n
* w4 Y! D' J2 M5 }; K4 J$ B* d! _5 b    for j =1 :n
        if l(i)>l(j)+W(j,i)
            l(i)=l(j)+W(j,i);
            z(i)=j;
- P2 T9 i8 v: ]  o) R, ~! ?9 m            if j                i=j-1;
2 O! P3 g" u- E  j3 u3 q( y0 H  k            end
. m! u. S; O. }. U0 ^- x        end
    end
    i=i+1;
end
% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
" ?2 Z+ F/ z* Y. M%     2     0   Inf     6     1   Inf   Inf   Inf
%      1   Inf     0     7   Inf   Inf     9   Inf
%      8     6     7     0     5     1     2   Inf
%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
9 x5 g' C: I. e9 t& z%    Inf   Inf     9     2   Inf     4     0     3
) n6 a# y# F/ T- |# o& I7 w  m+ a%    Inf   Inf   Inf   Inf     9     6     3     0  ];