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

李芳

function[T c]=Primf(Z)
% 表示邻接矩阵
+ z) ?3 p/ c/ @9 B4 I1 Y%c表示生成树的权和
% T表示生成树的边集合
' K/ o! s1 X+ D4 j9 ul=length(Z);
a(a==0)=inf;
k=1:l;
listV(k)=0;
# K+ i" A9 M1 P: @9 h) W3 @listV(l)=l;
e=1;
while(e<1)
  {4 J0 _. W: K+ l    min=inf;
    for i=1:l
        if listV(i)==1
            for j=1:l
1 x$ P2 ?- o5 h& R9 B5 L                if listV(j)==0 & min>Z(i,j)
! ]0 F0 i. R5 A! r: \& H' {                    min=a(i,j);
                    b=a(i,j);
! V+ }# l) ?. D$ P3 T                    s=i;
                    d=j;
                end
            end
        end
* Y( I& X: q# [' {5 y    end
    listV(d)=l;
$ S. F- B$ U4 k" j6 ~5 g  u    distance(e)=b;
    source(e)=s;
    destinantion(e)=d;
: r2 U2 m/ o- M  ]5 W+ L    e=e+1;
end

. [' t0 Q" v' D) S- @4 q0 j. |T=[source;destination];
for g=1:e-1
6 J# Q- q3 e7 ?3 n8 k0 [6 e    c(g)=Z(T(1,g),T(2,g));
end
6 ^5 X% r( N$ E' m8 _c;
& Q4 J3 C$ f/ [' y! q  u
1 k' G3 T+ {" l0 P
2 E5 _4 B( M: y5 b

李芳

5 O, R. D, D, @