function?L=prim（a）
%a為鄰接矩陣
n=size（a1）;
L=zeros（nn）;%連接矩陣以v1到其它點(diǎn)的所有邊作為候選邊
%closest=zeros（1n）;%對(duì)某個(gè)頂點(diǎn)vi不屬于v-s若lowcost[i]=0則i在s中;若0%lowcost=zeros（1n）;%其最小權(quán)值為lowcost[i]若lowcost[i]=inf則i與closest之間沒有邊
for?i=1:n
????lowcost（i）=a（1i）;
????closest（i）=1;
end???%給lowcost和closest賦初值
for?i=1:n-1???%找出n-1個(gè)頂點(diǎn)
????minm=inf;
????for?j=1:n