基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
n = size (W,1);
, K8 k$ b! Z8 W; ~. S0 vfor i = 1 :n
: X" x6 g& a/ |# i: C    l(i)=W(1,i);
    z(i)=1;
: y" F8 {; b; f4 c6 o2 g; nend
i=1;
3 ], `* p/ n. \while i<=n
3 g* r* M5 Q& {  p: P) Q1 U4 ]) F    for j =1 :n
        if l(i)>l(j)+W(j,i)
$ `! p- {5 D% w& j% e6 L            l(i)=l(j)+W(j,i);
. }+ w# q1 B# y            z(i)=j;
            if j                i=j-1;
            end
        end
    end
% B) w  s$ T- Y) ~; C# }    i=i+1;
end
% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
%     2     0   Inf     6     1   Inf   Inf   Inf
) U- l0 x" `+ l: V. Z6 `%      1   Inf     0     7   Inf   Inf     9   Inf
%      8     6     7     0     5     1     2   Inf
$ E) P% p! {: O' P# f- E%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
$ {2 A! \6 N5 p& m* R%    Inf   Inf     9     2   Inf     4     0     3
%    Inf   Inf   Inf   Inf     9     6     3     0  ];