基于matlab Dijkstra算法的实现

zzh121300

function [l,z]=Dijkstra(W)
n = size (W,1);
% n3 ?0 i$ l! i( afor i = 1 :n
6 n; y  h, R8 y4 H3 x) w    l(i)=W(1,i);
, P) m5 r/ z9 z# M) ^/ i% ]  y( Q    z(i)=1;
end
i=1;
while i<=n
    for j =1 :n
        if l(i)>l(j)+W(j,i)
; W' ?2 Q  r, _( n* Q7 {  S            l(i)=l(j)+W(j,i);
            z(i)=j;
$ f# ]* M: n/ `$ v7 q9 S- Y. |6 U            if j                i=j-1;
9 t( F; n( z' s2 [3 d7 a. M# p            end
" E# M' k4 S& a4 Q2 N4 @% u" m2 g9 }        end
    end
    i=i+1;
4 y: R: ]( E8 M, U4 q# c9 U' Aend
: r, B3 t# G# g+ X2 D7 @6 w% W =[ 0     2     1     8   Inf   Inf   Inf   Inf
%     2     0   Inf     6     1   Inf   Inf   Inf
%      1   Inf     0     7   Inf   Inf     9   Inf
%      8     6     7     0     5     1     2   Inf
# ]7 ^8 g% z+ ^5 r%    Inf     1   Inf     5     0     3   Inf     9
! [1 A# I" b3 l  {  W& o%    Inf   Inf   Inf     1     3     0     4     6
%    Inf   Inf     9     2   Inf     4     0     3
%    Inf   Inf   Inf   Inf     9     6     3     0  ];