prim最小树调试 哪里出错了 求高手指点

李芳

function[T c]=Primf(Z)
: z! _; V# u+ T% _( O% 表示邻接矩阵
. W% p& P' T9 ?1 A- N( W%c表示生成树的权和
% T表示生成树的边集合
l=length(Z);
+ C  N8 q. y3 ]+ c$ ]2 _: Ma(a==0)=inf;
k=1:l;
listV(k)=0;
/ w3 p5 b" _, ^6 Y( e/ ]listV(l)=l;
6 Z8 M+ [% u: ~8 @# A* Ne=1;
while(e<1)
# k  H/ I7 p! [7 ?2 R! h0 f! Z    min=inf;
    for i=1:l
% l  D. G; l% @. ^; {& W4 s3 n        if listV(i)==1
! `* A& s/ E) D% }            for j=1:l
                if listV(j)==0 & min>Z(i,j)
                    min=a(i,j);
                    b=a(i,j);
# c! w! p. e6 ?; X6 V% P                    s=i;
                    d=j;
5 p# r% |1 H8 p& P# H                end
: U, S1 }+ V( U9 L0 T            end
4 k" @! d* G$ p# z2 \        end
    end
5 a8 s0 Q" i6 H; L: S) r: `    listV(d)=l;
0 Y3 M5 O+ K0 G  F6 {4 y) ^! R$ P2 L    distance(e)=b;
    source(e)=s;
- h1 D6 ~0 ^6 S    destinantion(e)=d;
    e=e+1;
end
0 `+ _7 C. N: o5 O$ b3 P
$ O) k; L! g9 p2 }9 x' AT=[source;destination];
for g=1:e-1
( E+ @( T( k: C- {    c(g)=Z(T(1,g),T(2,g));
end
% b  _) r. {. hc;

/ b3 P1 g3 g1 L# P( n6 L
  N' a7 _" D0 ~

李芳