QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 2053|回复: 1
打印 上一主题 下一主题

求助:dijkstra的matlab程序后一段看不懂...

[复制链接]
字体大小: 正常 放大
athenaeee 实名认证       

4

主题

4

听众

112

积分

升级  6%

该用户从未签到

自我介绍
大家好!请多多指教~

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-8 16:30 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
clear;/ O8 j. Z& E, D0 Q7 h6 `
clc;
* m3 E+ S2 ]9 x  _7 m  H7 WM=10000;%无穷远距离4 a. [' E9 N7 t% }7 k
a(1,:)=[0,50,M,40,25,10];# ?, i! s, F: k' b$ G# V% H5 p& E/ N
a(2,:)=[zeros(1,2),15,20,M,25];( ~* S7 t$ E9 C' q9 Z, t, o
a(3,:)=[zeros(1,3),10,20,M];
4 S2 t* h/ Z# e0 R# y  Wa(4,:)=[zeros(1,4),10,25];
- D7 }2 j0 H* b. Q: v2 ~a(5,:)=[zeros(1,5),55];
3 I* V: d  _; l& f' aa(6,:)=zeros(1,6);1 v# a; y8 _" |
a=a+a';%a66邻接矩阵,无向图' n- ?* M2 i8 a( m4 h" k8 ^
pb(1:length(a))=0;pb(1)=1;%存放p,t标号信息
; g" v& t* n& N  g6 ^) z2 j0 T9 V% bindex1=1;%存放标号顶点顺序
& c8 l6 {. w. O! W, eindex2=ones(1,length(a));%存放始点到第i点最短通路中第i顶点前一顶点的序号
- ~( M! n+ Q' ]1 e* Hd(1:length(a))=M;d(1)=0;%存放由始点到第i点最短通路的值
! m( o4 U2 k) ?temp=1;%算c1到其它点的最短路2 m9 f' ~8 [9 Q* N
while sum(pb)<length(a), A0 R/ s* o) d9 U/ M; |
   tb=find(pb==0);%开始算第tb个顶点的最短路' a# M. }, z+ f+ Y
   d(tb)=min(d(tb),d(temp)+a(temp,tb));
# ^2 m! N! X2 `   tmpb=find(d(tb)==min(d(tb)));+ t$ D: n# X: q8 a$ W! d, r
   temp=tb(tmpb(1));. F7 n  M3 V9 I
   pb(temp)=1;
: J$ A: H) @9 A7 t/ E$ q4 j+ ]   index1=[index1,temp];& T3 m, e+ Y* ?2 w$ l
   index=index1(find(d(index1)==d(temp)-a(temp,index1)));
1 K6 U- S! r) P4 A   if length(index)>=2
  Z; M, D! w7 ]; i" c      index=index(1);
' Q8 O7 M0 O6 ~; X# i2 a) j, L9 d  P   end
- ^* K9 @3 v) K$ K; g  K8 r$ }! M   index2(temp)=index;
. E" I3 s1 C, W" C* c7 U/ lend
& x7 J7 ~* K* ?- W+ T: Zd, index1, index2
- K/ O: K4 D* u1 E
, t0 K+ {* b& C1 M* y8 @# Y从没加注释那一行就看不太懂了,求问啊,感激不尽!
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
athenaeee 实名认证       

4

主题

4

听众

112

积分

升级  6%

该用户从未签到

自我介绍
大家好!请多多指教~

新人进步奖

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2024-5-28 08:59 , Processed in 0.380876 second(s), 56 queries .

回顶部