算法设计与分析:回溯法求解地图涂色问题(含代码,4种改进方法)

目录

实验目的

一、背景知识

二、实验内容

1.简单地图四色涂色

2.450点5色/15色/25色

3.随机产生不同规模的图,用4色着色,分析算法效率与图规模的关系。

三、算法思想

1、结构选择:邻接矩阵和一些列数组。

2、具体算法

2.1 未改进的回溯法:

2.2 置换剪枝

2.3 向前探查剪枝策略:

2.4 最少剩余量选择(MRV)

2.5 度最大选择(DH)

3.简单随机地图的生成

四、结论、注意/建议(请注意看此部分)

1 结论/效率(我自己电脑上)

2 注意/建议

2.1   关于le450_15b

2.2   涂色结果的存放

2.3 拷贝构造

3、代码


实验目的

1. 掌握回溯法算法设计思想。

2. 掌握地图填色问题的回溯法解法。

一、背景知识

       为地图或其他由不同区域组成的图形着色时,相邻国家/地区不能使用相同的颜色。我们可能还想使用尽可能少的不同颜色进行填涂。一些简单的“地图”(例如棋盘)仅需要两种颜色(黑白),但是大多数复杂的地图需要更多颜色。

       每张地图包含四个相互连接的国家时,它们至少需要四种颜色。1852年,植物学专业的学生弗朗西斯·古思里(Francis Guthrie)于1852年首次提出“四色问题”。他观察到四种颜色似乎足以满足他尝试的任何地图填色问题,但他无法找到适用于所有地图的证明。这个问题被称为四色问题。长期以来,数学家无法证明四种颜色就够了,或者无法找到需要四种以上颜色的地图。直到1976年德国数学家沃尔夫冈·哈肯(Wolfgang Haken,生于1928年)和肯尼斯·阿佩尔(Kenneth Appel,1932年-2013年)使用计算机证明了四色定理,他们将无数种可能的地图缩减为1936种特殊情况,每种情况都由一台计算机进行了总计超过1000个小时的检查。他们因此工作获得了美国数学学会富尔克森奖。在1990年,哈肯成为伊利诺伊大学高级研究中心的成员,他现在是该大学的名誉教授。

       四色定理是第一个使用计算机证明的著名数学定理,此后变得越来越普遍,争议也越来越小。更快的计算机和更高效的算法意味着今天您可以在几个小时内在笔记本电脑上证明四种颜色定理。

二、实验内容

1.简单地图四色涂色

1. 用4色填色下面的这个小规模地图,测试算法的正确性。将其转换为平面图,每个地区表示为一个顶点,相邻地区用边连接,对这个图的顶点着色,并且相邻的两个顶必须使用不同的颜色。

                                                      dc766b8b42514fc89d1b3fe1a7c1bc8a.png

图1 测试算法正确性的小规模地图

对改图各区域进行编号 ,然后保存在一个文档(参考第2部分的文件格式)用于后面程序的输入。

2.450点5色/15色/25色

       分别读入附件中的3个图文件le450_5a.col, le450_15b.col, le450_25a.col,其中,le450_5a.col中的图用5色着色,le450_15b.col中的图用15色着色,le450_25a.col中的图用25色着色,测试3个图文件对应的算法运行时间,并将着色结果输出到文本中(按照顶点序号输出每个顶点的颜色,每个颜色占1行,颜色用1, 2, 3, …表示,着色结果文件名为相应的图文件名加上后缀out,即分别为le450_5a.col.out, le450_15b.col.out, le450_25a.col.out)。

       文件读取:

        例如文件le450_5a.col:先是c开头的一系列注释,然后一句p开头的点数、边数信息,接着是e开头的一条条边信息。须用fstream读入文件并提取相关点、边信息用于构建(注意获取信息时的格式,stoi(string str)可以将str转为int型 )。我自己是从p开头的那句开始获取,然后可用颜色数是人为输入

51fcfe88a58947cf914a4484239ea092.png

3.随机产生不同规模的图,用4色着色,分析算法效率与图规模的关系。

三、算法思想

1、结构选择:邻接矩阵和一些列数组。

string infilename;//要涂色的文件名
string outfilename;//要存放涂色结果的文件名
class Map{
	public:
	int n,m;//点数,边数
	int cn;//颜色种类数
	int **v;//点相连情况,0未连,1相连,v[i][0]存放出度
	int **cv;//点的剩余可选颜色和cv[i][0]剩余颜色的可涂情况cv[i][j],cv[i][j]==1可涂,cv[i][j]j<1不可涂
	int *cl;//颜色填涂情况,-1表示还未被填涂
	bool flag;//判断是否求得可行解,1为是,0为否
	int *x;//降序后序号对原序号的映射,降度排序用
	int *X;//降序后原序号对现序号的映射
	int *xx;//记录降度排序后的度数
……
}

2、具体算法

2.1 未改进的回溯法:

void MLdef(int s){//第s个点
	int i,j;
	bool f;
	if(s>n){//先判断是否已经有可行解
		flag=true;
		return;
	}
	//对每种颜色都进行尝试
	for(i=1;i<=cn;i++){
		cl[s]=i;//模拟颜色填涂
		f=true;//先设置为可行
		for(j=1;j<s;j++)
			if(v[j][s]==1&&cl[j]==cl[s]){
				f=false;//前面已经有与之相连而且颜色相同的点,不可行
				break;
			}
		if(f){//如果该颜色可行,则继续填涂下一个点
			MLdef(s+1);
			cl[s]=-1;//返回来,说明后面涂色失败,取消当前涂色;
            //可以不用考虑这个cl[s]=-1
		}else cl[s]=-1;//可以不用
	}
}

2.2 置换剪枝

对于一种涂色结果,如果对各种颜色进行轮换可以得到另一种涂色结果,m种颜色可以得到m!种解。所以,当求出第一种解时可以不再继续求解(事实上对该实验足够了,只需有解就行)。

所以,可以在for循环里添加一个条件判断 !flag,这样就可以只保证求出一种解后不继续求解(其实继续求解会覆盖前面正确的解的涂色情况,是要避免的)。

2.3 向前探查剪枝策略:

在搜索过程中,当某点选择了一个颜色后,相邻节点的可选颜色中将该颜色删去。如果在删除前(搜索探查一遍)发现删除后有相邻点没有颜色可以填涂,就放弃该节点的这个颜色

这里用二维数组        int **cv;//点的剩余可选颜色cv[i][0]和剩余颜色的可涂情况cv[i][j],cv[i][j]==1可涂,cv[i][j]j<1不可涂        cv[i][0]存放第i个点剩余的可涂颜色数目。每次涂色j时,将相邻点i的该色可涂情况--,即cv[i][j]--。   并判断是否需要减少可涂颜色数目:如果相邻点i的cv[i][j]原本是1,然后--变为0,则需要减少cv[i][0],即cv[i][0]--。     cv[i][j]之所以用1表示可涂,<1表示不可涂,而不是单单用0表示不可涂,是因为,可能有多个点导致某个点i的某种颜色j执行减少操作,如果只用0表示不可涂,那么恢复时将难以判断是否要恢复成1的可涂情况

如果回溯回来了,则需取消当前区域s的当前涂色,cl[s]=-1;并对前面的--操作进行恢复,即++。

一共增加了三部分:

        1)搜索:当前点涂色后,检查相邻点是否只剩下这种颜色可涂(即当前点的该涂色会导致相邻点接下来出现无色可涂的情况)。

        2)减少:减少相邻点改色的可涂情况cv[i][j]--及是否cv[i][0]--。

        3)恢复:cv[i][j]++及是否需要cv[i][0]++。

只使用这种方法改进算法时效率提高不是很大。

2.4 最少剩余量选择(MRV

优先选择剩余未填色节点中可填颜色最少的节点(通过比较cv[i][0]),可以增大该路径是可行解的几率。因为剩余颜色更少的点其确定性更大(分支少),更容易找到可行解。此时下一个要涂色的点就不一定是当前点序号加1了,需要增加一个“确定下一个点”的函数Fi()

//--------------------------------//找当前可涂元素最少的点
int Fi(){
	int i,j=-1;//-1表示没有点未涂色了
	for(i=1;i<=n;i++)
		if(cl[i]==-1){//先找第一个还未涂色的点
			j=i;
			break;
		}
	for(i++;i<=n;i++)
		if(cl[i]==-1&&cv[i][0]<cv[j][0])
		//选未涂色且颜色更少的点,
        //如果在开始涂色前完成了降度排序,就相当于寻找可涂颜色最少且度较大的点
			j=i;
	return j;
}

返回-1时将不用再递归了,将flag置真,return。

该方法对效率提高比较明显(在前面的置换剪枝、向前探测剪枝情况下加上该MVR,该实验的三个图均几十秒可得可行解)。

2.5 度最大选择(DH

优先选择度最大的节点进行填色,因为度数越大的节点受到其他节点的约束就越大,先填涂其他节点容易导致度数大的节点无可填颜色,延长运行时间。                                                                    这里建议先MRV再DH(但在该程序中是在开始涂色前先DH排好序,在涂色时直接按下标递增的顺序找可涂颜色最少的点,效果一样)。因为单独使用DH无法保证下一个涂色的点与前面已经涂色的点区域块是相连的,相当于在另一个区域重新开始涂色(前面的方法的下一个点都是与已涂色区域块相连的),几个区域块间在涂色时更容易发送冲突,导致运行时间增长,甚至求不出解。

降度排序用到数组x[](存放降度排序后的点),xx[],X[],降度可以用选择排序(代码简单)

    int *x;//降序后序号对原序号的映射,降度排序用
	int *X;//降序后原序号对现序号的映射
	int *xx;//记录降度排序后的度数,降度排序用
for(i=1;i<n;i++){//降度,选择排序法
			t=i;
			for(j=i+1;j<=n;j++)
				if(xx[j]>xx[t])
					t=j;
			if(t!=i){
				q=x[i];
				x[i]=x[t];
				x[t]=q;
				q=xx[i];
				xx[i]=xx[t];
				xx[t]=q;
			}
		}
for(i=1;i<=n;i++){//获取降序后原序号对现序号的映射
			for(j=1;j<=n;j++)
				if(x[j]==i){
					X[i]=j;
					break;
				}
		}

然后根据x[[和X[]重构v[][](要用到一个临时的二维数组y[][]来拷贝v[][])。

3.简单随机地图的生成

这里用人为输入来确定生成的地图的点、边数。

cout<<"请输入要生成的地图的点数、边数和存放信息的文件名称:"<<endl;
cin>>n>>m>>name;
Birn(n,m,name);//地图生成函数

由于要分析效率,所以要确保生成的地图四色涂色有可行解。所以不能出现5个点彼此间两两直接相连的情况

Birn(,,)执行地图的生成。这里每次生成一个边信息就进行一次判断(judge(n)函数)。

//一些生成地图要用到的全局变量
int **r;//存放邻接矩阵
int *w;//记录度数大于等于4的点
int rt=0;//记录度数大于等于4的点的个数
	srand((unsigned)time(NULL));
	for(i=1;i<=m;){//随机生成边
		a=rand()%n+1;//1~n
		b=rand()%n+1;//1~n
		if(a==b||r[a][b]==1)//新边是否有效或重复
			continue;

judge函数先计算度数(v[i][0],出度)大于等于4的点的个数rt是否大于等于5(有可能出现5个点彼此间两两直接相连的情况)并记录这些点的序号(保存在w[]数组中)。

bool judge(int n){
	int i,j;
	w=new int[n];
	rt=0;
	for(i=1;i<=n;i++)
		if(r[i][0]>=4){//记录度数大于等于4的点
			w[rt++]=i;
		}
	if(rt>=5)
		if(jd())
		return true;
	return false;
}

如果rt大于等于5,就调用jd()函数进行判断是否出现5个点彼此间两两直接相连的情况(5层for循环)。

如果发现新生成的边导致出现5个点彼此间两两直接相连的情况,则放弃该边,继续下一条边的生成。

四、结论、注意/建议(请注意看此部分)

1 结论/效率(我自己电脑上)

(以下默认使用置换剪枝)

只使用向前探测剪枝20分钟内未求解出来。

使用MRV和向前探测剪枝可短时间内求出可行解。

MRV、DH、向前探测剪枝三种一起用效率最高,三个图都是1秒内可以求解。

以le450_5a.col,MRV、DH且向前探测剪枝的回溯法(main函数先注释掉随机地图生成调用的部分)为例,运行结果如下:

3bbfec1eb3144b29a472547ae4b016c1.png

随机地图生成:

c0a149fb82314ebcbcf462793ab67fa6.png

2 注意/建议

2.1   关于le450_15b

其中le450_15b这个图从大多数点开始求解是不只15种颜色才能有可行解的(可以输入可选颜色为50种,看最后涂色结果输出时最大的颜色序号。比如从降度排序后的第1个点开始求解,需要16种颜色才求出可行解)。这里建议可以以降度后的第4个点为起始点进行涂色。

2.2   涂色结果的存放

使用降度排序求得可行解时,注意在存储涂色结果时要按X[]的顺序存放而不是降度排序后的x[]顺序存放(实验用的check程序是按降度排序前的点顺序检测涂色结果是否正确的)。所以打印函数要两个,区分一下。

void Print1(){
    ofstream outfile(outfilename,std::ofstream::trunc);//以trunc的方式打开可以清空文件内容
    for(int i=1;i<=n;i++){
		outfile<<(to_string(cl[i])+"\n");
	}
	outfile.close();
}
void Print2(){
    ofstream outfile(outfilename,std::ofstream::trunc);//以trunc的方式打开可以清空文件内容
    for(int i=1;i<=n;i++){
		outfile<<(to_string(cl[X[i]])+"\n");
	}
	outfile.close();
}

2.3 拷贝构造

由于实验要分析算法效率,建议多编一个拷贝构造函数。

借鉴时记得修改润色一下。

3、代码

#include<iostream>
#include<ctime>
#include<fstream>
using namespace std;
string infilename;//要涂色的文件名
string outfilename;//要存放涂色结果的文件名
class Map{
	public:
	int n,m;//点数,边数
	int cn;//颜色种类数
	int **v;//点相连情况,0未连,1相连,v[i][0]存放出度
	int **cv;//点的剩余可选颜色和cv[i][0]剩余颜色的可涂情况cv[i][j],cv[i][j]==1可涂,cv[i][j]j<1不可涂
	int *cl;//颜色填涂情况,-1表示还未被填涂
	bool flag;//判断是否求得可行解,1为是,0为否
	int *x;//降序后序号对原序号的映射,降度排序用
	int *X;//降序后原序号对现序号的映射
	int *xx;//记录降度排序后的度数,降度排序用
	Map(){
		int i,j,a,b;
		cout<<"请输入要涂色的文件名:"<<endl;
		cin>>infilename;
		ifstream infile(infilename.c_str());
		outfilename=infilename+".out";
		cout<<"则存放涂色结果的文件名为:"<<outfilename<<endl;
		cout<<"请输入可用的颜色种类数:"<<endl;
		cin>>cn;
		string s,pointnum,colornum,edgenum,x,y;
		while(getline(infile,s)){
			if(s[0]=='p'){
				//cout<<s<<endl;
				for(i=7;s[i]!=' ';i++)
					pointnum+=s[i];
				for(i++;i<s.length()&&s[i]!=' ';i++)
					edgenum+=s[i];
				cout<<"n:"<<pointnum<<";"<<endl;
				n=stoi(pointnum);
				cout<<"m:"<<edgenum<<";"<<endl;
				m=stoi(edgenum);
				break;
			}
		}
		cl=new int[n+1];
		v=new int*[n+1];
		cv=new int*[n+1];
		flag=false;
		for(i=0;i<=n;i++){
			v[i]=new int[n+1];
			cl[i]=-1;
			for(j=0;j<=n;j++)
				v[i][j]=0;
			cv[i]=new int[cn+1];
				cv[i][0]=cn;
			for(j=1;j<=cn;j++)
				cv[i][j]=1;
		}
		cout<<"初始化成功"<<endl;
		while(getline(infile,s)){
			//cout<<s<<endl;
			x="";y="";
			for(i=2;s[i]!=' ';i++)
				x+=s[i];
			for(i++;i<s.length()&&s[i]!=' ';i++)
				y+=s[i];
			//cout<<x<<";"<<y<<";"<<endl;
			a=stoi(x);
			b=stoi(y);
			v[a][b]=1;
			v[b][a]=1;
			v[a][0]++;
			v[b][0]++;
			//cout<<"ok"<<endl;
		}
		infile.close();
		cout<<"相连矩阵已构建完成"<<endl;
	}
//-------------------------------------//复制函数
	Map(Map *p){
		int i,j;
		n=p->n;
		m=p->m;//点数,边数
		cn=p->cn;
		cl=new int[n+1];
		v=new int*[n+1];
		cv=new int*[n+1];
		flag=false;
		for(i=0;i<=n;i++){
			v[i]=new int[n+1];
			cl[i]=-1;
			for(j=0;j<=n;j++)
				v[i][j]=p->v[i][j];
			cv[i]=new int[cn+1];
				cv[i][0]=cn;
			for(j=1;j<=cn;j++)
				cv[i][j]=1;
		}
	}
//-------------------------------------//结果存入文件
void Print1(){
    ofstream outfile(outfilename,std::ofstream::trunc);//以trunc的方式打开可以清空文件内容
    for(int i=1;i<=n;i++){
		outfile<<(to_string(cl[i])+"\n");
	}
	outfile.close();
}
void Print2(){
    ofstream outfile(outfilename,std::ofstream::trunc);//以trunc的方式打开可以清空文件内容
    for(int i=1;i<=n;i++){
		outfile<<(to_string(cl[X[i]])+"\n");
	}
	outfile.close();
}
//------------------------------------//降度排序
	void Sort(){//排序
		int i,j,t,q;
		x=new int[n+1];//降序后序号对原序号的映射
		xx=new int[n+1];//度数
		X=new int[n+1];//降序后原序号对现序号的映射
		int **y=new int*[n+1];//拷贝邻接矩阵
		for(i=0;i<=n;i++){
			x[i]=i;
			xx[i]=v[i][0];
			y[i]=new int[n+1];
			for(j=0;j<=n;j++)
				y[i][j]=0;
		}
		for(i=1;i<n;i++){//降度,选择排序法
			t=i;
			for(j=i+1;j<=n;j++)
				if(xx[j]>xx[t])
					t=j;
			if(t!=i){
				q=x[i];
				x[i]=x[t];
				x[t]=q;
				q=xx[i];
				xx[i]=xx[t];
				xx[t]=q;
			}
		}
		for(i=1;i<=n;i++){//获取降序后原序号对现序号的映射
			for(j=1;j<=n;j++)
				if(x[j]==i){
					X[i]=j;
					break;
				}
		}
		/*cout<<"x序号:";//序号和度数的输出
		for(i=1;i<=n;i++)
			cout<<x[i]<<" ";
		cout<<endl;
		cout<<"xx度数:";
		for(i=1;i<=n;i++)
			cout<<xx[i]<<" ";
		cout<<endl;
		cout<<"X序号:";
		for(i=1;i<=n;i++)
			cout<<X[i]<<" ";
		cout<<endl;
		*/
		for(i=1;i<=n;i++){//调整关系
			for(j=1;j<=n;j++){
				if(v[x[i]][x[j]]==1){
					y[i][j]=1;
					y[i][0]++;
				}
			}
		}
		for(i=0;i<=n;i++){//复制排序结果
			for(j=0;j<=n;j++){
				v[i][j]=y[i][j];
			}
		}
		cout<<"排序完成"<<endl;
	}

//--------------------------------------------未改进的回溯法(蛮力)
void MLdef(int s){//第s个点
	int i,j;
	bool f;
	if(s>n){//先判断是否已经有可行解
		flag=true;
		return;
	}
	//对每种颜色都进行尝试
	for(i=1;i<=cn&&!flag;i++){
	//如果还有颜色没试过而且还未有可行解则继续填涂下一种颜色
		cl[s]=i;//模拟颜色填涂
		f=true;//先设置为可行
		for(j=1;j<s;j++)
			if(v[j][s]==1&&cl[j]==cl[s]){
				f=false;//前面已经有与之相连而且颜色相同的点,不可行
				break;
			}
		if(f){//如果该颜色可行,则继续填涂下一个点
			MLdef(s+1);
			cl[s]=-1;
		}else cl[s]=-1;
	}
}
//--------------------------------------------向前探查剪枝
void frontdef(int s){//第s个点
	int i,j,p;
	bool f=false;
	if(s>n){//先判断是否已经有可行解
		flag=true;
		return;
	}
	//cout<<s<<" ";
	//对合法颜色进行测试
	for(i=1;i<=cn&&!flag;i++){
	//如果还有颜色没试过而且还未有可行解则继续填涂下一种颜色
		if(cv[s][i]==1){
			cl[s]=i;//模拟颜色填涂
			f=true;//先设置为可行
			for(j=1;j<=n;j++){
				if(v[s][j]==1&&cv[j][0]==1&&cv[j][i]==1){//相邻、还未涂色而且只剩这一种颜色,不可行
					f=false;
					break;
				}
			}
			if(!f){//该颜色不可行,跳过
				cl[s]=-1;
				continue;
			}
			for(j=1;j<=n;j++)//减少相邻点可涂的颜色
				if(v[s][j]==1){
				    if(cv[j][i]==1)
						cv[j][0]--;
					cv[j][i]--;
				}
			frontdef(s+1);//涂色下一个点
			if(flag)//涂色成功,有可行解,回溯
				return;
			cl[s]=-1;//涂色失败,取消涂色
			for(j=1;j<=n;j++)//涂色不可行,对“减少相邻点可涂的颜色”进行恢复
				if(v[s][j]==1){//相邻
					if(cv[j][i]==0)
						cv[j][0]++;//可涂颜色+1
					cv[j][i]++;//恢复上一种颜色因为可能之前有其他点已经使该点该颜色减少过,
							     //所以不用0表示不可涂,而用<1,然后减少与恢复分别用--和++
				}
		}
	}
}
//--------------------------------//找当前可涂元素最少的点
int Fi(){
	int i,j=-1;//-1表示没有点未涂色了
	for(i=1;i<=n;i++)
		if(cl[i]==-1){//先找第一个还未涂色的点
			j=i;
			break;
		}
	for(i++;i<=n;i++)
		if(cl[i]==-1&&cv[i][0]<cv[j][0])
		//选未涂色且颜色更少的点,
        //如果在开始涂色前完成了降度排序,就相当于寻找可涂颜色最少且度较大的点
			j=i;
	return j;
}
//--------------------------------------------MRV且向前探查剪枝
void mrvdef(int s){//第s个点
	int i,j,p,next;
	bool f=false;
	//cout<<s<<" ";
	//对合法颜色进行测试
	for(i=1;i<=cn&&!flag;i++){
	//如果还有颜色没试过而且还未有可行解则继续填涂下一种颜色
		if(cv[s][i]==1){
			cl[s]=i;//模拟颜色填涂
			f=true;//先设置为可行
			for(j=1;j<=n;j++){
				if(v[s][j]==1&&cv[j][0]==1&&cv[j][i]==1){//相邻而且只剩这一种颜色,不可行
					f=false;
					break;
				}
			}
			if(!f){//该颜色不可行,跳过
				cl[s]=-1;
				continue;
			}
			for(j=1;j<=n;j++)//减少相邻点可涂的颜色
				if(v[s][j]==1){
				    if(cv[j][i]==1)
						cv[j][0]--;
					cv[j][i]--;
				}
			next=Fi();//下一个点(可涂颜色最少的)
			if(next==-1){
				flag=true;//已涂完
				return;
			}
			mrvdef(next);//涂色下一个点
			if(flag)//涂色成功,有可行解,回溯
				return;
			cl[s]=-1;//涂色失败,取消涂色
			for(j=1;j<=n;j++)//涂色不可行,对“减少相邻点可涂的颜色”进行恢复
				if(v[s][j]==1){//相邻
					if(cv[j][i]==0)
						cv[j][0]++;//可涂颜色+1
					cv[j][i]++;//恢复上一种颜色因为可能之前有其他点已经使该点该颜色减少过,
							     //所以不用0表示不可涂,而用<1,然后减少与恢复分别用--和++
				}
		}
	}
}
//--------------------------------------------最少颜色、降度、向前探查剪枝
void gooddef(int s){//第s个点
	int i,j,p,next;
	bool f=false;
	//对合法颜色进行测试
	for(i=1;i<=cn&&!flag;i++){
	//如果还有颜色没试过而且还未有可行解则继续填涂下一种颜色
		if(cv[s][i]==1){
			cl[s]=i;//模拟颜色填涂
			f=true;//先设置为可行
			for(j=1;j<=n;j++){//相邻且只剩这一种颜色
				if(v[s][j]==1&&cv[j][0]==1&&cv[j][i]==1){
					f=false;
					break;
				}
			}
			if(!f){//该颜色不可行,跳过
				cl[s]=-1;
				continue;
			}
			for(j=1;j<=n;j++)//减少相邻点可涂的颜色
				if(v[s][j]==1){//相邻
				    if(cv[j][i]==1)
						cv[j][0]--;
					cv[j][i]--;
				}
			next=Fi();//未涂色,而且颜色更少
			if(next==-1){//全部涂完,有可行解,回溯
				flag=true;
				return;
			}
			gooddef(next);//涂色下一个点cout<<"+"<<endl;
			if(flag)//如果成功则退出
				return;
			cl[s]=-1;//涂色失败,取消涂色
			for(j=1;j<=n;j++)//涂色不可行,对“减少相邻点可涂的颜色”进行恢复
				if(v[s][j]==1){//相邻
					if(cv[j][i]==0)
						cv[j][0]++;//可涂颜色+1
					cv[j][i]++;
				}
		}
	}
}
};
//---------
int **r;//存放邻接矩阵
int *w;//记录度数大于等于4的点
int rt=0;//记录度数大于等于4的点的个数
bool jd(){
	int i,j,k,l,m;
	for(i=1;i<=rt-4;i++){//第一个点
		for(j=i+1;j<=rt-3;j++){
    		if(r[w[i]][w[j]]==1){//第二个点
    		for(k=j+1;k<=rt-2;k++)
    			if(r[w[k]][w[j]]==1&&r[w[k]][w[i]]==1){//第3个点
				for(l=k+1;l<=rt-1;l++)
					if(r[w[l]][w[i]]==1&&r[w[l]][w[j]]==1&&r[w[l]][w[k]]==1){//第4个点
					for(m=l+1;m<=rt;m++)
						if(r[w[m]][w[i]]==1&&r[w[m]][w[j]]==1&&r[w[m]][w[k]]==1&&r[w[m]][w[l]]==1){//第5个点
							return true;
						}
					}
				}
			}
		}
	}
	return false;
}
//-------------------------判断是否有5个两两直接相连的点(不可4色涂色成功)
bool judge(int n){
	int i,j;
	w=new int[n];
	rt=0;
	for(i=1;i<=n;i++)
		if(r[i][0]>=4){//记录度数大于等于4的点
			w[rt++]=i;
		}
	if(rt>=5)
		if(jd())
		return true;
	return false;
}
//--------------------------------------------随机地图生成
void Birn(int n,int m,string name){//点数、边数和存储信息的文件名称
	ofstream outf(name.c_str());
	r=new int*[n+1];
	int i,j,a,b;
	for(i=0;i<=n;i++){//邻接矩阵初始化
		r[i]=new int[n+1];
		for(j=0;j<=n;j++)
			r[i][j]=0;
	}
	srand((unsigned)time(NULL));
	for(i=1;i<=m;){//随机生成边
		a=rand()%n+1;//1~n
		b=rand()%n+1;//1~n
		if(a==b||r[a][b]==1)
			continue;
		r[a][b]=1;
		r[b][a]=1;
		r[a][0]++;
		r[b][0]++;
		//cout<<a<<" "<<b<<endl;
		if(judge(n)){//判断是否导致五点两两直接相连
			r[a][b]=0;
			r[b][a]=0;
			r[a][0]--;
			r[b][0]--;
			continue;
		}
		cout<<"edge"<<i<<": "<<a<<" "<<b<<endl;//输出边信息
		i++;
	}
	cout<<"开始存放信息!"<<endl;
	outf<<"p edge "<<n<<" "<<m<<endl;//存放信息
	for(i=1;i<=n;i++)
		for(j=i+1;j<=n;j++){
			if(r[i][j]==1){
				outf<<"e "<<i<<" "<<j<<endl;
			}
		}
	outf.close();
}

//
int main(){
	cout<<"你好"<<endl;
	int n,cn,m;
	double t1=0,t2=0,t3=0,t4=0;
	string name;
	bool flag1=false,flag2=false,flag3=false,flag4=false;
	//----------------------------------------------------随机地图生成
	//cout<<"请输入要生成的地图的点数、边数和存放信息的文件名称:"<<endl;
	//cin>>n>>m>>name;
	//Birn(n,m,name);
	Map *map1=new Map();
	Map *map2=new Map(map1);
	Map *map3=new Map(map1);
	Map *map4=new Map(map1);
	cout<<"请输入求解循环的次数:"<<endl;
    cin>>n;
    //----------------------------------------------------未改进的回溯法(蛮力)
    /*cout<<"蛮力法开始"<<endl;
    for(int i=0;i<n;i++){
		if(i<(n-1)){
    		Map *p=new Map(map1);
			double start1=clock();
			p->MLdef(1);
			double end1=clock();
			t1+=(end1-start1)/CLOCKS_PER_SEC;
			//cout<<p->flag<<"  "<<1000000*t1<<endl;
		}else{
			double start1=clock();
			map1->MLdef(1);
			double end1=clock();
			t1+=(end1-start1)/CLOCKS_PER_SEC;
			//cout<<1000000*t1<<endl;
			if(map1->flag)
				flag1=true;
		}
	}
	if(map1->flag){
		cout<<"未改进的回溯法(蛮力)有找到可行解。"<<endl//是否成功填涂
			<<"平均运行时间为"<<1000*t1/n<<"ms"<<endl<<endl;//运行时间
   		cout<<"颜色填涂情况为:"<<endl;
		for(int i=1;i<=map1->n;i++)//打印颜色填涂情况
			cout<<map1->cl[i]<<endl;
		map1->Print1();
	}else cout<<"未改进的回溯法(蛮力)没有找到可行解"<<endl<<endl;

	cout<<"------------------------------------------------"<<endl;
    //-----------------------------------------------------向前探查剪枝的回溯法
    cout<<"向前探查剪枝的回溯法开始"<<endl;
    for(int i=0;i<n;i++){
    	if(i<(n-1)){
    		Map *p=new Map(map2);
    		//cout<<i<<"复制成功"<<endl;
			double start2=clock();
			p->frontdef(1);
			double end2=clock();
			t2+=(end2-start2)/CLOCKS_PER_SEC;
		}else{
			double start2=clock();
			map2->frontdef(1);
			double end2=clock();
			t2+=(end2-start2)/CLOCKS_PER_SEC;
			if(map2->flag)
				flag2=true;
		}
	}
	if(flag2){
		cout<<"向前探查剪枝的回溯法有可行解。"<<endl//是否成功填涂
			<<"平均运行时间为"<<1000*t2/n<<"ms"<<endl<<endl;
   		cout<<"颜色填涂情况为:"<<endl;
		for(int i=1;i<=map2->n;i++)//打印颜色填涂情况
			cout<<map2->cl[i]<<endl;
			map2->Print1();
	}else cout<<"向前探查剪枝的回溯法没有找到可行解"<<endl;
	cout<<"------------------------------------------------"<<endl;
    //-----------------------------------------------------MVR且向前探查剪枝的回溯法
    cout<<"MRV且向前探查剪枝的回溯法开始"<<endl;
    for(int i=0;i<n;i++){
    	if(i<(n-1)){
    		Map *p=new Map(map3);
    		//cout<<i<<"复制成功"<<endl;
			double start3=clock();
			p->mrvdef(1);
			double end3=clock();
			t3+=(end3-start3)/CLOCKS_PER_SEC;
		}else{
			double start3=clock();
			map3->mrvdef(1);
			double end3=clock();
			t3+=(end3-start3)/CLOCKS_PER_SEC;
			if(map3->flag)
				flag3=true;
		}
	}
	if(flag3){
		cout<<"MRV且向前探查剪枝的回溯法有可行解。"<<endl//是否成功填涂
			<<"平均运行时间为"<<1000*t3/n<<"ms"<<endl<<endl;
   		cout<<"颜色填涂情况为:"<<endl;
		for(int i=1;i<=map3->n;i++)//打印颜色填涂情况
			cout<<map3->cl[i]<<endl;
			map3->Print1();
	}else cout<<"MRV且向前探查剪枝的回溯法没有找到可行解"<<endl;
	cout<<"------------------------------------------------"<<endl;*/
    //------------------------------------------------------MRV、DH且向前探查剪枝的回溯法
    cout<<"MRV、DH且向前探查剪枝的回溯法开始"<<endl;
	double start=clock();
		map4->Sort();
	double end=clock();
		t4+=(end-start)/CLOCKS_PER_SEC;
    for(int i=0;i<n;i++){
    	if(i<(n-1)){
    		Map *p=new Map(map4);
			double start4=clock();
			//cout<<i+1<<"Sort!"<<endl;
			p->gooddef(4);
			double end4=clock();
			t4+=(end4-start4)/CLOCKS_PER_SEC;
		}else{
			double start4=clock();
			//cout<<i+1<<"Sort!"<<endl;
			map4->gooddef(4);
			double end4=clock();
			t4+=(end4-start4)/CLOCKS_PER_SEC;
			if(map4->flag)
				flag4=true;
		}
	}
	if(flag4){
		cout<<endl<<"MRV、DH且向前探查剪枝的回溯法有可行解。"<<endl//是否成功填涂
			<<"平均运行时间为"<<1000*t4/n<<"ms"<<endl<<endl;
   		cout<<"颜色填涂情况为:"<<endl;
		for(int i=1;i<=map4->n;i++){//打印颜色填涂情况
			cout<<map4->cl[map4->X[i]]<<endl;
		}
		map4->Print2();
	}else cout<<endl<<"MRV、DH且向前探查剪枝的回溯法没有找到可行解"<<endl;
}

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

草海桐

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值