基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
n = size (W,1);
- U  X0 p( K# D: h% _$ D5 Wfor i = 1 :n
9 f% d# H+ W# l- |    l(i)=W(1,i);
    z(i)=1;
end
i=1;
while i<=n
3 J+ X0 d6 j5 M4 m0 m6 Y- D+ T    for j =1 :n
        if l(i)>l(j)+W(j,i)
7 ]. p! Z; `  C( r1 v4 o& Y$ G( X            l(i)=l(j)+W(j,i);
            z(i)=j;
. `5 Q* z8 T: o2 S3 x            if j                i=j-1;
8 e8 S( M) y( k6 f! O# x( d            end
        end
    end
    i=i+1;
end
. ^; Q3 G; H, c6 [* o: O( h6 Y% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
3 L7 d/ g" Q0 s- j%     2     0   Inf     6     1   Inf   Inf   Inf
" t$ e- [6 ^3 n%      1   Inf     0     7   Inf   Inf     9   Inf
" d: Y% p4 ]7 g/ `%      8     6     7     0     5     1     2   Inf
: s1 l( R- y, K! y! F$ j%    Inf     1   Inf     5     0     3   Inf     9
7 f' Z- O$ j- m' ~! w%    Inf   Inf   Inf     1     3     0     4     6
%    Inf   Inf     9     2   Inf     4     0     3
  k' V8 i' D8 t6 I$ N%    Inf   Inf   Inf   Inf     9     6     3     0  ];