最小生成树

最小生成树

一个有 n 个结点的连通图的生成树是原图的极小连通子图，且包含原图中的所有 n 个结点，并且有保持图连通的最少的边。最小生成树可以用kruskal（克鲁斯卡尔）算法或Prim（普里姆）算法求出。 

目录	1概述 2应用	3性质说明 4算法描述

折叠编辑本段概述

​在一给定的无向图G = (V, E) 中，(u, v) 代表连接顶点 u 与顶点 v 的边（即），而 w(u, v) 代表此边的权重，若存在 T 为 E 的子集（即）且为无循环图，使得

的 w(T) 最小，则此 T 为 G 的最小生成树。

最小生成树其实是最小权重生成树的简称。

许多应用问题都是一个求无向连通图的最小生成树问题。例如：要在n个城市之间铺设光缆，主要目标是要使这 n 个城市的任意两个之间都可以通信，但铺设光缆的费用很高，且各个城市之间铺设光缆的费用不同；另一个目标是要使铺设光缆的总费用最低。这就需要找到带权的最小生成树。

折叠编辑本段应用

生成树和最小生成树有许多重要的应用。

【例】网络G表示n个城市之间的通信线路网线路（其中顶点表示城市，边表示两个城市之间的通信线路，边上的权值表示线路的长度或造价）。可通过求该网络的最小生成树达到求解通信线路或总代价最小的最佳方案。

折叠编辑本段性质说明

最小生成树性质：设G=(V，E）是一个连通网络，U是顶点集V的一个非空真子集。若(u，v）是G中一条“一个端点在U中（例如：u∈U），另一个端点不在U中的边（例如：v∈V-U），且（u，v）具有最小权值，则一定存在G的一棵最小生成树包括此边（u，v）。

性质证明

为方便说明，先作以下约定：

①将集合U中的顶点看作是红色顶点，②而V-U中的顶点看作是蓝色顶点，③连接红点和蓝点的边看作是紫色边，④权最小的紫边称为轻边（即权重最"轻"的边）。于是，MST性质中所述的边（u，v）就可简称为轻边。

用反证法证明MST性质：

假设G中任何一棵MST都不含轻边（u，v）。则若T为G的任意一棵MST，那么它不含此轻边。

根据树的定义，则T中必有一条从红点u到蓝点v的路径P，且P上必有一条紫边（u'，v'）连接红点集和蓝点集，否则u和v不连通。当把轻边（u，v）加入树T时，该轻边和P必构成了一个回路。删去紫边（u'，v'）后回路亦消除，由此可得另一生成树T'。

T'和T的差别仅在于T'用轻边（u，v）取代了T中权重可能更大的紫边（u'，v'）。因为w(u，v）≤w(u'，v'），所以

w(T')=w(T)+w(u，v)-w(u'，v'）≤w(T)

即T'是一棵比T更优的MST，所以T不是G的MST，这与假设矛盾。

所以，MST性质成立。

折叠编辑本段算法描述

求MST的一般算法可描述为：针对图G，从空树T开始，往集合T中逐条选择并加入n-1条安全边（u，v），最终生成一棵含n-1条边的MST。

当一条边（u，v）加入T时，必须保证T∪{(u，v)}仍是MST的子集，我们将这样的边称为T的安全边。

用伪代码可将算法描述为：

GenerieMST(G){//求G的某棵MST

T〈-￠； //T初始为空，是指顶点集和边集均空

while T未形成G的生成树 do{

找出T的一条安全边（u，v）；//即T∪{(u，v)}仍为MST的子集

T=T∪{(u，v)}； //加入安全边，扩充T

}

return T； //T为生成树且是G的一棵MST

}

折叠注意

下面给出的两种求MST的算法均是对上述的一般算法的求精，两算法的区别仅在于求安全边的方法不同。

为简单起见，下面用序号0，1，…，n-1来表示顶点集，即是：

V(G)={0，1，…，n-1}，

G中边上的权解释为长度，并设T=(U，TE）。

求最小生成树的具体算法（pascal):

A.Prim算法：

procedure prim(v0:integer);

var

lowcost,closest:array[1..maxn] of integer;

i,j,k,min:integer;

begin

for i:=1 to n do begin

lowcost:=cost[v0,i];

closest:=v0;

end;

for i:=1 to n-1 do begin

{寻找离生成树最近的未加入顶点 k}

min:=maxlongint;

for j:=1 to n do

if (lowcost[j]<min) and (lowcost[j]<>0) then begin

min:=lowcost[j];

k:=j;

end;

lowcost[k]:=0; {将顶点k 加入生成树}

{生成树中增加一条新的边 k 到 closest[k]}

{修正各点的 lowcost 和 closest 值}

for j:=1 to n do

if cost[k,j]<lowcost[j] then begin

lowcost[j]:=cost[k,j];

closest[j]:=k;

end;

end;

end;

B.Kruskal算法：（贪心）

按权值递增顺序删去图中的边，若不形成回路则将此边加入最小生成树。

function find(v:integer):integer; {返回顶点 v 所在的集合}

var i:integer;

begin

i:=1;

while (i<=n) and (not v in vset) do inc(i);

if i<=n then find:=i else find:=0;

end;

procedure kruskal;

var

tot,i,j:integer;

begin

for i:=1 to n do vset:=i;{初始化定义 n 个集合，第 I个集合包含一个元素 I}

p:=n-1; q:=1; tot:=0; {p 为尚待加入的边数，q 为边集指针}

sort;

{对所有边按权值递增排序，存于 e中，e.v1 与 e.v2 为边 I 所连接的两个顶点的

序号，e.len 为第 I条边的长度}

while p>0 do begin

i:=find(e[q].v1）;j:=find(e[q].v2）;

if i<>j then begin

inc(tot,e[q].len);

vset:=vset+vset[j];vset[j]:=[];

dec(p);

end;

inc(q);

end;

writeln(tot);

end;

C语言完整代码如下（已编译通过）：

#include<stdio.h>

#include<stdlib.h>

#include<iostream.h>

#define MAX_VERTEX_NUM 20

#define OK 1

#define ERROR 0

#define MAX 1000

typedef struct Arcell

{

double adj;

}Arcell,AdjMatrix[MAX_VERTEX_NUM][MAX_VERTEX_NUM];

typedef struct

{

char vexs[MAX_VERTEX_NUM]; //节点数组

AdjMatrix arcs; //邻接矩阵

int vexnum,arcnum; //图的当前节点数和弧数

}MGraph;

typedef struct Pnode //用于普利姆算法

{

char adjvex; //节点

double lowcost; //权值

}Pnode,Closedge[MAX_VERTEX_NUM]; //记录顶点集U到V-U的代价最小的边的辅助数组定义

typedef struct Knode //用于克鲁斯卡尔算法中存储一条边及其对应的2个节点

{

char ch1; //节点1

char ch2; //节点2

double value;//权值

}Knode,Dgevalue[MAX_VERTEX_NUM];

//-----------------------------------------------------------------------------------

int CreateUDG(MGraph & G,Dgevalue & dgevalue);

int LocateVex(MGraph G,char ch);

int Minimum(MGraph G,Closedge closedge);

void MiniSpanTree_PRIM(MGraph G,char u);

void Sortdge(Dgevalue & dgevalue,MGraph G);

//-----------------------------------------------------------------------------------

int CreateUDG(MGraph & G,Dgevalue & dgevalue) //构造无向加权图的邻接矩阵

{

int i,j,k;

cout<<"请输入图中节点个数和边/弧的条数：";

cin>>G.vexnum>>G.arcnum;

cout<<"请输入节点：";

for(i=0;i<G.vexnum;++i)

cin>>G.vexs;

for(i=0;i<G.vexnum;++i)//初始化数组

{

for(j=0;j<G.vexnum;++j)

{

G.arcs[j].adj=MAX;

}

}

cout<<"请输入一条边依附的定点及边的权值："<<endl;

for(k=0;k<G.arcnum;++k)

{

cin >> dgevalue[k].ch1 >> dgevalue[k].ch2 >> dgevalue[k].value;

i = LocateVex(G,dgevalue[k].ch1）;

j = LocateVex(G,dgevalue[k].ch2）;

G.arcs[j].adj = dgevalue[k].value;

G.arcs[j].adj = G.arcs[j].adj;

}

return OK;

}

int LocateVex(MGraph G,char ch) //确定节点ch在图G.vexs中的位置

{

int a ;

for(int i=0; i<G.vexnum; i++)

{

if(G.vexs == ch)

a=i;

}

return a;

}

void MiniSpanTree_PRIM(MGraph G,char u)//普利姆算法求最小生成树

{

int i,j,k;

Closedge closedge;

k = LocateVex(G,u);

for(j=0; j<G.vexnum; j++)

{

if(j != k)

{

closedge[j].adjvex = u;

closedge[j].lowcost = G.arcs[k][j].adj;

}

}

closedge[k].lowcost = 0;

for(i=1; i<G.vexnum; i++)

{

k = Minimum(G,closedge);

cout<<"("<<closedge[k].adjvex<<","<<G.vexs[k]<<","<<closedge[k].lowcost<<")"<<endl;

closedge[k].lowcost = 0;

for(j=0; j<G.vexnum; ++j)

{

if(G.arcs[k][j].adj < closedge[j].lowcost)

{

closedge[j].adjvex = G.vexs[k];

closedge[j].lowcost= G.arcs[k][j].adj;

}

}

}

}

int Minimum(MGraph G,Closedge closedge) //求closedge中权值最小的边，并返回其顶点在vexs中的位置

{

int i,j;

double k = 1000;

for(i=0; i<G.vexnum; i++)

{

if(closedge.lowcost != 0 && closedge.lowcost < k)

{

k = closedge.lowcost;

j = i;

}

}

return j;

}

void MiniSpanTree_KRSL(MGraph G,Dgevalue & dgevalue)//克鲁斯卡尔算法求最小生成树

{

int p1,p2,i,j;

int bj[MAX_VERTEX_NUM]; //标记数组

for(i=0; i<G.vexnum; i++) //标记数组初始化

bj=i;

Sortdge(dgevalue,G);//将所有权值按从小到大排序

for(i=0; i<G.arcnum; i++)

{

p1 = bj[LocateVex(G,dgevalue.ch1）];

p2 = bj[LocateVex(G,dgevalue.ch2）];

if(p1 != p2）

{

cout<<"("<<dgevalue.ch1<<","<<dgevalue.ch2<<","<<dgevalue.value<<")"<<endl;

for(j=0; j<G.vexnum; j++)

{

if(bj[j] == p2）

bj[j] = p1;

}

}

}

}

void Sortdge(Dgevalue & dgevalue,MGraph G)//对dgevalue中各元素按权值按从小到大排序

{

int i,j;

double temp;

char ch1,ch2;

for(i=0; i<G.arcnum; i++)

{

for(j=i; j<G.arcnum; j++)

{

if(dgevalue.value > dgevalue[j].value)

{

temp = dgevalue.value;

dgevalue.value = dgevalue[j].value;

dgevalue[j].value = temp;

ch1 = dgevalue.ch1;

dgevalue.ch1 = dgevalue[j].ch1;

dgevalue[j].ch1 = ch1;

ch2 = dgevalue.ch2;

dgevalue.ch2 = dgevalue[j].ch2;

dgevalue[j].ch2 = ch2;

}

}

}

}

void main()

{

int i,j;

MGraph G;

char u;

Dgevalue dgevalue;

CreateUDG(G,dgevalue);

cout<<"图的邻接矩阵为："<<endl;

for(i=0; i<G.vexnum; i++)

{

for(j=0; j<G.vexnum; j++)

cout << G.arcs[j].adj<<" ";

cout<<endl;

}

cout<<"=============普利姆算法===============\n";

cout<<"请输入起始点：";

cin>>u;

cout<<"构成最小代价生成树的边集为：\n";

MiniSpanTree_PRIM(G,u);

cout<<"============克鲁斯科尔算法=============\n";

cout<<"构成最小代价生成树的边集为：\n";

MiniSpanTree_KRSL(G,dgevalue);

}

编辑本段pascal

program didi;

var

a:array[0..100000] of record

s,t,len:longint;

end;

fa,r:array[0..10000] of longint;

n,i,j,x,y,z:longint;

tot,ans:longint;

count,xx:longint;

procedure quick(l,r:longint);

var

i,j,x,y,t:longint;

begin

i:=l;j:=r;

x:=a[(l+r) div 2].len;

repeat

while x>a.len do inc(i);

while x<a[j].len do dec(j);

if i<=j then

begin

y:=a.len;a.len:=a[j].len;a[j].len:=y;

y:=a.s;a.s:=a[j].s;a[j].s:=y;

y:=a.t;a.t:=a[j].t;a[j].t:=y;

inc(i);dec(j);

end;

until i>j;

if i<r then quick(i,r);

if l<j then quick(l,j);

end;

function find(x:longint):longint;

begin

if fa[x]<>x then fa[x]:=find(fa[x]);

find:=fa[x];

end;

procedure union(x,y:longint);{启发式合并}

var

t:longint;

begin

x:=find(x);

y:=find(y);

if r[x]>r[y] then

begin

t:=x;x:=y;y:=t;

end;

if r[x]=r[y] then inc(r[x]);

fa[x]:=y;

end;

begin

readln(xx,n);

for i:=1 to xx do fa:=i;

for i:=1 to n do

begin

read(x,y,z);

inc(tot);

a[tot].s:=x;

a[tot].t:=y;

a[tot].len:=z;

end;

quick（1,tot);{将边排序}

ans:=0;

count:=0;

i:=0;

while count<=x-1 do{count记录加边的总数}

begin

inc(i);

with a do

if find(s)<find(t) then

begin

union(s,t);

ans:=ans+len;

inc(count);

end;

end;

write(ans);

end.

编辑本段Prim

var

m,n:set of 1..100;

s,t,min,x,y,i,j,k,l,sum,p,ii:longint;

a:array[1..100,1..100]of longint;

begin

readln(p);

for ii:=1 to p do

begin

k:=0; sum:=0;

fillchar(a,sizeof(a),255);

readln(x);

m:=[1];

n:=[2..x];

for i:=1 to x do

begin

for j:=1 to x do

begin

read(a[i,j]);

if a[i,j]=0

then a[i,j]:=maxlongint;

end;

readln;

end;

for l:=1 to x-1 do

begin

min:=maxlongint;

for i:=1 to x do

if i in m

then begin

for j:=1 to x do

begin

if (a[i,j]<min)and(j in n)

then begin

min:=a[i,j];

s:=i;

t:=j;

end;

end;

end;

sum:=sum+min;

m:=m+[t];

n:=n-[t];

inc(k);

end;

writeln(sum);

end;

end.

详情请参考：https://baike.so.com/doc/6806060-7023006.html