基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
0 a# O0 ?$ a+ o1 _! S/ ]n = size (W,1);
4 H; h' z! r$ _: e2 s9 R: Nfor i = 1 :n
    l(i)=W(1,i);
    z(i)=1;
end
' D+ J8 |; w2 f0 F/ Ni=1;
; R$ _7 M5 R4 b1 {! ewhile i<=n
6 F% c, J6 J3 M( @: p: E9 ?    for j =1 :n
        if l(i)>l(j)+W(j,i)
1 Y8 p! q6 o3 g            l(i)=l(j)+W(j,i);
9 X4 r" p5 u/ l; k- c            z(i)=j;
            if j                i=j-1;
            end
        end
5 J2 @7 z9 n: F7 p    end
" l3 S9 L2 k6 L$ b5 H* h: o    i=i+1;
( [. P: C4 H8 Wend
5 a' T2 w  Q& {1 p! V' ?% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
- x% _6 Y  ?3 @) K+ y$ V; e%     2     0   Inf     6     1   Inf   Inf   Inf
%      1   Inf     0     7   Inf   Inf     9   Inf
( m5 }0 t9 \# Y$ A%      8     6     7     0     5     1     2   Inf
, a/ c& ^* i. P# r4 L) o%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
%    Inf   Inf     9     2   Inf     4     0     3
%    Inf   Inf   Inf   Inf     9     6     3     0  ];