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

李芳

function[T c]=Primf(Z)
2 a3 z5 g, @2 Q& v* C/ P, Y% 表示邻接矩阵
* h" D* X8 y) `# B. R! ~%c表示生成树的权和
% T表示生成树的边集合
8 Y; o7 ~$ D6 }; Hl=length(Z);
a(a==0)=inf;
k=1:l;
0 J- X* H# P# V/ ~listV(k)=0;
! Q8 e7 L! d" W( {2 b1 ~listV(l)=l;
. Z2 d. u# K) L' E9 Qe=1;
' B  }3 D3 Y! ]' b5 |- Gwhile(e<1)
" F# A" i) q; x    min=inf;
    for i=1:l
% m/ \/ a* i( ?% Y' A        if listV(i)==1
9 R1 f6 {2 j8 I$ {            for j=1:l
                if listV(j)==0 & min>Z(i,j)
                    min=a(i,j);
7 {+ n0 {% F: T7 G. F                    b=a(i,j);
                    s=i;
                    d=j;
                end
            end
        end
  m' c1 ^. I  [. |    end
    listV(d)=l;
, T2 c0 a1 H( W2 Z, h* q    distance(e)=b;
  P! y+ [7 Q7 E1 p9 Y, i+ m    source(e)=s;
    destinantion(e)=d;
    e=e+1;
end

1 t) }: F# b. e. g/ J$ r$ `1 iT=[source;destination];
for g=1:e-1
    c(g)=Z(T(1,g),T(2,g));
+ e% Z6 Z, Z  }+ ?0 ]0 d, {end
; v. w( J* ^0 H" B! |% r- H  Jc;
) F1 `- W1 j, f" y
4 x& g3 s$ m. K+ K7 g9 g- ^

李芳