QQ登录

只需要一步,快速开始

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

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

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

4

主题

4

听众

112

积分

升级  6%

该用户从未签到

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

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-8 16:30 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
clear;! @. q/ m/ h8 D; M# k
clc;+ x+ C, I" W$ G, Z+ ]9 l
M=10000;%无穷远距离9 q, a3 D2 f7 V* b' w. L/ G
a(1,:)=[0,50,M,40,25,10];
% `& a# H5 O9 y( L& Za(2,:)=[zeros(1,2),15,20,M,25];$ Z& M, D# N3 Z: J' F8 h
a(3,:)=[zeros(1,3),10,20,M];
" d  _5 E4 u8 n; X- p2 Ra(4,:)=[zeros(1,4),10,25];
* {9 @4 f# C+ m, T  a* P, y5 ?a(5,:)=[zeros(1,5),55];3 {4 W) p2 R; T2 x0 O; p
a(6,:)=zeros(1,6);
( q7 ^, F' Z) p0 Ca=a+a';%a66邻接矩阵,无向图. ^: R9 X+ W1 Z" V/ X
pb(1:length(a))=0;pb(1)=1;%存放p,t标号信息3 D& I  f; Z" t3 \  S
index1=1;%存放标号顶点顺序
; {& f7 N1 f, F6 n1 ?& ]index2=ones(1,length(a));%存放始点到第i点最短通路中第i顶点前一顶点的序号
9 ^4 B/ M. P2 U7 s- Ld(1:length(a))=M;d(1)=0;%存放由始点到第i点最短通路的值5 ?9 J, x# @# P5 r# x5 }1 i& }
temp=1;%算c1到其它点的最短路$ `. j  A# z. b
while sum(pb)<length(a)
9 W# T3 [( x2 {/ l   tb=find(pb==0);%开始算第tb个顶点的最短路
4 M2 I6 s. O2 L+ Z" Y) D   d(tb)=min(d(tb),d(temp)+a(temp,tb));
! n% k  q6 M. s) q3 o  I. h   tmpb=find(d(tb)==min(d(tb)));8 F* c. ^# A6 P
   temp=tb(tmpb(1));8 W% Y+ e* S! N& W
   pb(temp)=1;2 s7 \7 s/ `/ m9 ^) i/ M9 ^- _
   index1=[index1,temp];
% j. ^  ]# c3 C7 P0 y4 Q% ]! ]   index=index1(find(d(index1)==d(temp)-a(temp,index1)));* w+ j, }" d$ i: y. e' w/ @1 @
   if length(index)>=2
# y3 V6 z6 h- _) F      index=index(1);
, D; i. C$ U( I- t9 _   end
: ]7 Z5 E& H2 x+ ?   index2(temp)=index;
9 N3 ^- D$ ^% M4 J- p7 l; Rend
9 e  [) f$ a/ W9 ~d, index1, index2
! ]/ g6 r( b: k8 J4 J& e- O; p* o2 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, 2026-4-10 00:13 , Processed in 0.418568 second(s), 57 queries .

回顶部