基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
. A; Z/ q- c; c, N# b5 D5 F& ?n = size (W,1);
for i = 1 :n
: E8 ]  L) d- l    l(i)=W(1,i);
    z(i)=1;
end
i=1;
" Q( ]1 I7 Z- owhile i<=n
- c7 r$ z) ^6 r4 J% s    for j =1 :n
+ J/ y% v$ W: D- c- D        if l(i)>l(j)+W(j,i)
            l(i)=l(j)+W(j,i);
3 P4 l1 K% D) ]6 R) S            z(i)=j;
" M0 L  P9 @4 B# f( r+ X& H& e            if j                i=j-1;
0 q1 r3 H9 W" l+ r8 v            end
        end
    end
    i=i+1;
& T& w. S& u6 Y& E; [  f% }3 Rend
% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
" W- D& q$ X/ i" G  B2 q%     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
4 F- n8 B8 w6 o7 J/ D%    Inf   Inf   Inf     1     3     0     4     6
8 p3 K' g2 E9 r) T, L: V%    Inf   Inf     9     2   Inf     4     0     3
% R* f& w6 p( h%    Inf   Inf   Inf   Inf     9     6     3     0  ];