QQ登录

只需要一步,快速开始

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

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

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

4

主题

4

听众

112

积分

升级  6%

该用户从未签到

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

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-8 16:30 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
clear;
+ J1 g$ v, N+ i% W) lclc;- E0 c: U" L: |# Y
M=10000;%无穷远距离
" z. h. J6 y1 Fa(1,:)=[0,50,M,40,25,10];3 u. ]/ W' P! f. d; K; {9 E# w/ j
a(2,:)=[zeros(1,2),15,20,M,25];. N' M3 z4 X( U5 T4 U& Y9 H7 \
a(3,:)=[zeros(1,3),10,20,M];
" X2 H% {# C% [2 d& o- t* ha(4,:)=[zeros(1,4),10,25];3 [' d) N5 L) c. y4 N2 B+ [
a(5,:)=[zeros(1,5),55];
3 ^% G8 K( [5 M# qa(6,:)=zeros(1,6);
& n3 ]/ K6 d5 {, ?' Ta=a+a';%a66邻接矩阵,无向图
% w/ y; I2 h! Y8 d9 ]pb(1:length(a))=0;pb(1)=1;%存放p,t标号信息/ k0 s; g1 V. ~. O
index1=1;%存放标号顶点顺序
3 ~$ L/ N  V# k+ Qindex2=ones(1,length(a));%存放始点到第i点最短通路中第i顶点前一顶点的序号/ W. J2 W2 V9 d% D: }6 [
d(1:length(a))=M;d(1)=0;%存放由始点到第i点最短通路的值4 O  [7 t+ E7 O
temp=1;%算c1到其它点的最短路" F/ g# d5 G8 ]$ q, ]
while sum(pb)<length(a); x! c2 s' z  [' F
   tb=find(pb==0);%开始算第tb个顶点的最短路  D! ~: v2 T; @- I7 ]# o0 ^' [
   d(tb)=min(d(tb),d(temp)+a(temp,tb));* u5 _3 {* y( t" B! s3 D
   tmpb=find(d(tb)==min(d(tb)));
0 y' D: N1 h/ Y5 `. m* y- T   temp=tb(tmpb(1));
1 H! q. G( B/ R" E& Z8 X, D   pb(temp)=1;5 ^: [" M/ S  b2 x" x/ r- A( T% A
   index1=[index1,temp];
5 k4 Z7 j7 O. X* M) t, z! E9 q7 q' S   index=index1(find(d(index1)==d(temp)-a(temp,index1)));, @( |" g- k' l9 ~* [
   if length(index)>=2
& K8 M$ \/ g& `: r* I      index=index(1);
$ l- i1 B% A9 Q. e/ k   end! h5 y5 T; D' A. y
   index2(temp)=index;
/ v" [/ a0 p2 C  H2 k2 A$ Q% Cend6 G" M7 p5 I: z4 y. s
d, index1, index2
; }' y7 ~6 T- {9 n; \2 n
$ ~* D% B  F: \6 j) A- X从没加注释那一行就看不太懂了,求问啊,感激不尽!
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, 2026-5-26 07:08 , Processed in 0.367181 second(s), 56 queries .

回顶部