mengfanqi 发表于 2005-9-6 20:15

[讨论] 惊暴:dijkstra算法

function f=dijkstra(w)<BR>%dijkstra算法<BR>   %w为 带权邻接矩阵<BR>   n=size(w,1);<BR>   w1=w(1,:);<BR>   for i=1:n<BR>       l(i)=w1(i);%此处 l()为v0到v的初始距离<BR>       z(i)=1;<BR>   end<BR>   s=[]；%s(i)为最短路径顺序<BR>   s(1)=1;<BR>   u=s(1);<BR>   k=1;<BR>   l<BR>   z<BR>   while k&lt;n<BR>       for i=1:n<BR>           for j=1:k<BR>               if i~=s(j)<BR>                   if l(i)&gt;l(u)+w(u,i)<BR>                       % v0到v的距离数组<BR>                       l(i)=l(u)+w(u,i);<BR>                       z(i)=u;<BR>                   end <BR>               end<BR>           end<BR>       end<BR>       l<BR>       z<BR>       ll=l;       %ll为判断数组<BR><BR>              for i=1:n<BR>           for j=1:k<BR>               if i~=s(j)<BR>                   ll(i)=ll(i);<BR>               else<BR>                   ll(i)=inf;<BR>               end<BR>           end<BR>       end<BR>       ll<BR>       lv=inf;<BR>       for i=1:n<BR>           if ll(i)&lt;lv<BR>               lv=ll(i);<BR>               v=i;<BR>           end<BR>       end<BR>       lv<BR>       v<BR>       s(k+1)=v<BR>       k=k+1<BR>       u=s(k)<BR>   end<BR>   l        % 得到v0到v的最短路<BR><BR>      z     %v的父矩阵<BR><BR>

haol123 发表于 2009-7-9 17:36

function f=dijkstra(w)
    |
Error: Function definitions are not permitted at the prompt or in scripts.
为啥呀？

kiddyse 发表于 2009-7-12 23:32

1# mengfanqi

居然程序里有笑脸…

kiddyse 发表于 2009-7-12 23:33

明明回复了…没有矩阵币…

sxjm000016 发表于 2009-7-14 09:50

程序里的笑脸说明做的有水平！！！！

room339 发表于 2010-8-27 11:56

?????????????

文素 发表于 2010-12-28 00:33

............................

阳光风雨 发表于 2011-6-30 15:33

{:3_46:}汗

jt202010 发表于 2011-6-30 23:21

{:3_41:}{:3_41:}{:3_41:}

thoal 发表于 2011-7-1 09:16

...........................
页: [1] 2
查看完整版本: [讨论] 惊暴:dijkstra算法