基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
/ D( v2 G9 E& ?4 ?n = size (W,1);
for i = 1 :n
+ r. r+ o/ S' ^$ B+ c* Z4 K1 F6 y    l(i)=W(1,i);
    z(i)=1;
- |% c8 C, E$ [6 H7 Mend
i=1;
. `* c: B5 G# n% h! Fwhile i<=n
1 m4 c$ {1 _+ @' \9 d+ d1 c    for j =1 :n
0 D2 ~) {' m3 J0 S+ [, |) M6 e  f8 G        if l(i)>l(j)+W(j,i)
            l(i)=l(j)+W(j,i);
' B, j7 J! Y# G8 C            z(i)=j;
9 T4 m# s4 O8 t, s* c8 H; m            if j                i=j-1;
! B7 ~0 t: k* o4 [, b- m            end
% O- E" v" v6 j0 Y        end
2 v0 B; e1 r; D3 H  A8 u    end
3 G' g# n. I) H5 Q& e7 E1 S) u. \    i=i+1;
5 n$ u+ ?- V9 X/ \9 Hend
% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
2 e6 [" a' n- r# s* ~%     2     0   Inf     6     1   Inf   Inf   Inf
1 q; e; _2 _/ ~%      1   Inf     0     7   Inf   Inf     9   Inf
6 C! ]8 u0 z+ D; T( z& B%      8     6     7     0     5     1     2   Inf
' r5 s6 d5 a$ u& r; N%    Inf     1   Inf     5     0     3   Inf     9
%    Inf   Inf   Inf     1     3     0     4     6
$ v" ^# R" _- A6 K2 f%    Inf   Inf     9     2   Inf     4     0     3
- D4 W- U+ `2 x8 L/ f%    Inf   Inf   Inf   Inf     9     6     3     0  ];