QQ登录

只需要一步,快速开始

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

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

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

4

主题

4

听众

112

积分

升级  6%

该用户从未签到

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

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-8 16:30 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
clear;9 C6 a2 _" W  r; y
clc;- Y4 @, U  Y4 q2 G
M=10000;%无穷远距离- t% r: O% N4 E$ O! J
a(1,:)=[0,50,M,40,25,10];0 L  V7 [* E: d) I
a(2,:)=[zeros(1,2),15,20,M,25];" C1 Z! g+ {4 J" D* C1 b
a(3,:)=[zeros(1,3),10,20,M];; h9 [/ W, `1 e1 y6 T. w, G" r
a(4,:)=[zeros(1,4),10,25];2 h9 ?! x: k8 ]! \$ K
a(5,:)=[zeros(1,5),55];: _# T7 I4 f$ z& f' m& o' f
a(6,:)=zeros(1,6);5 R' _% M5 k( N% a
a=a+a';%a66邻接矩阵,无向图* I& ?: E  H+ ^7 e' x( _% F' V
pb(1:length(a))=0;pb(1)=1;%存放p,t标号信息. H# C4 }2 f  C7 g$ J) z4 B" w
index1=1;%存放标号顶点顺序
! i& W) m/ B$ C; Pindex2=ones(1,length(a));%存放始点到第i点最短通路中第i顶点前一顶点的序号% ^" F. v7 N; t2 U% I5 a+ s
d(1:length(a))=M;d(1)=0;%存放由始点到第i点最短通路的值7 C  @8 ~4 {$ h1 V/ j0 h1 E& K
temp=1;%算c1到其它点的最短路
+ O( C/ k6 E1 _$ b2 N+ Fwhile sum(pb)<length(a)! c) S2 `. Z' h4 c
   tb=find(pb==0);%开始算第tb个顶点的最短路+ z2 e* B% ^: C
   d(tb)=min(d(tb),d(temp)+a(temp,tb));
0 ]4 r7 t9 q) J, y" E. g. i% T   tmpb=find(d(tb)==min(d(tb)));! g2 Q4 H3 L% o/ R# x: }
   temp=tb(tmpb(1));
+ j: o; ~/ [3 A% I   pb(temp)=1;
/ {# |! j4 a+ o; A! T$ t' X) g. J   index1=[index1,temp];, B4 \; B; r6 [
   index=index1(find(d(index1)==d(temp)-a(temp,index1)));
0 J+ y) F. V6 A! r) [: Q   if length(index)>=26 i, l4 ?9 \, z9 F
      index=index(1);
5 l. z2 z! o" N# N" ^0 S& v5 n, w   end
; p- T) Z! O7 p: U) n" I0 R& F0 |5 [   index2(temp)=index;- j' \7 H- N( L; _
end
) u! y3 ]$ |; O- ^' l* Ud, index1, index2
+ x6 a, p3 L' s% d/ m( o7 Q6 h, G7 m# P- T
从没加注释那一行就看不太懂了,求问啊,感激不尽!
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 06:11 , Processed in 0.404467 second(s), 56 queries .

回顶部