关于dijkstra的问题。

晒个小太阳。

我手头有一个现成的dijkstra算法的matlab程序，但是只能输出某个点到最短通路的值，以及标号顶点顺序，以及标号顶点索引。
3 |4 I$ E* t1 l) t) ?
  J* ^, g' m3 A3 U6 o8 o, i
我想知道有没有什么程序能够输出具体的最短路径，比如说从1到5的最短路径是1->3->4->5，就是类似这样的，有没有这样的dijkstra程度啊。  如果没有的话，那通过现有的是不是能推出来呢？望高人指点啊~小弟感激不尽。
5 _( E  U+ I3 Q1 n% l
对了，我还想问最短路径生成树是什么东西？？

附程序如下：
" P4 O- H& w% E: Jclear;
: j' L- {5 _( o, {7 a/ ^# C% L0 C" Aclc;
M=10000;
0 i4 D( x  X, _$ b: Ja(1,:)=[0,50,M,40,25,10];
1 t% {/ y) O2 ]: |a(2,:)=[zeros(1,2),15,20,M,25];
a(3,:)=[zeros(1,3),10,20,M];
a(4,:)=[zeros(1,4),10,25];
5 T  F# ^3 Q2 |9 |& s: b# s0 Qa(5,:)=[zeros(1,5),55];
a(6,:)=zeros(1,6);
' E% W$ O" y: @7 Oa=a+a';
pb(1:length(a))=0;pb(1)=1;index1=1;index2=ones(1,length(a));
8 Z9 J$ s  j# P. yd(1:length(a))=M;d(1)=0;temp=1;
$ \  x- P" |+ {+ W/ O) U' |while sum(pb)<length(a)
! |: D* I# u: O+ H# B   tb=find(pb==0);
   d(tb)=min(d(tb),d(temp)+a(temp,tb));
- k# a7 c& G3 s* _/ f   tmpb=find(d(tb)==min(d(tb)));
   temp=tb(tmpb(1));
   pb(temp)=1;
   index1=[index1,temp];
   index=index1(find(d(index1)==d(temp)-a(temp,index1)));
. W0 X& ~: q' \5 S   if length(index)>=2
      index=index(1);
   end
   index2(temp)=index;
end
1 Z: }9 N8 T$ P  V0 [d, index1, index2

木兆木风

我这里有VC2008的，需要的话我可以给你发

和谐宁静

用LINGo挺好的 对于这个算法