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

李芳

function[T c]=Primf(Z)
, E- P1 A: v, _* h# ~% |2 C% 表示邻接矩阵
%c表示生成树的权和
! D  }- G# W/ G# f% T表示生成树的边集合
l=length(Z);
  q5 [' [" @2 Z' z* Q- U1 qa(a==0)=inf;
k=1:l;
- K+ E3 ~. k# {listV(k)=0;
1 L$ n/ f$ O; R" C( MlistV(l)=l;
5 }& u+ E' g% J3 ye=1;
while(e<1)
    min=inf;
    for i=1:l
        if listV(i)==1
! k) p) ^% {" N0 i5 C            for j=1:l
) ]. n5 }/ |0 \                if listV(j)==0 & min>Z(i,j)
/ R2 l) w& c  g, M                    min=a(i,j);
8 _  c1 S1 C: Z3 [' Q6 O; A; d                    b=a(i,j);
; [6 Z) v% _8 o$ M& x                    s=i;
7 Z7 Z. w: F: N- n' p                    d=j;
, t; w+ \- e7 G: _( X) W8 l                end
& V& j% L% k* @3 P            end
! v, l, ^* C- W$ m  i; C        end
    end
. S  W/ ^" R) B& {3 C    listV(d)=l;
/ r4 J+ F; V! g    distance(e)=b;
. U6 c  ]9 Z/ K! {" `4 d5 Z; j( I: i1 c    source(e)=s;
" p; f- I8 n- H& a4 e9 I" `    destinantion(e)=d;
    e=e+1;
end
, `' k4 K' {, p- B5 x& e7 k. y
! E& F- A2 j& T" \2 gT=[source;destination];
for g=1:e-1
    c(g)=Z(T(1,g),T(2,g));
end
c;


. D( j0 y# Q/ o0 S" O8 e1 D) t- w3 ~

李芳