【TSP】基于matlab遗传模拟退火算法求解旅行商问题【含Matlab源码 696期】

289 阅读11分钟

一、简介

1 遗传算法概述
遗传算法(Genetic Algorithm,GA)是进化计算的一部分,是模拟达尔文的遗传选择和自然淘汰的生物进化过程的计算模型,是一种通过模拟自然进化过程搜索最优解的方法。该算法简单、通用,鲁棒性强,适于并行处理。

2 遗传算法的特点和应用
遗传算法是一类可用于复杂系统优化的具有鲁棒性的搜索算法,与传统的优化算法相比,具有以下特点:
(1)以决策变量的编码作为运算对象。传统的优化算法往往直接利用决策变量的实际值本身来进行优化计算,但遗传算法是使用决策变量的某种形式的编码作为运算对象。这种对决策变量的编码处理方式,使得我们在优化计算中可借鉴生物学中染色体和基因等概念,可以模仿自然界中生物的遗传和进化激励,也可以很方便地应用遗传操作算子。
(2)直接以适应度作为搜索信息。传统的优化算法不仅需要利用目标函数值,而且搜索过程往往受目标函数的连续性约束,有可能还需要满足“目标函数的导数必须存在”的要求以确定搜索方向。遗传算法仅使用由目标函数值变换来的适应度函数值就可确定进一步的搜索范围,无需目标函数的导数值等其他辅助信息。直接利用目标函数值或个体适应度值也可以将搜索范围集中到适应度较高部分的搜索空间中,从而提高搜索效率。
(3)使用多个点的搜索信息,具有隐含并行性。传统的优化算法往往是从解空间的一个初始点开始最优解的迭代搜索过程。单个点所提供的搜索信息不多,所以搜索效率不高,还有可能陷入局部最优解而停滞;遗传算法从由很多个体组成的初始种群开始最优解的搜索过程,而不是从单个个体开始搜索。对初始群体进行的、选择、交叉、变异等运算,产生出新一代群体,其中包括了许多群体信息。这些信息可以避免搜索一些不必要的点,从而避免陷入局部最优,逐步逼近全局最优解。
(4) 使用概率搜索而非确定性规则。传统的优化算法往往使用确定性的搜索方法,一个搜索点到另一个搜索点的转移有确定的转移方向和转移关系,这种确定性可能使得搜索达不到最优店,限制了算法的应用范围。遗传算法是一种自适应搜索技术,其选择、交叉、变异等运算都是以一种概率方式进行的,增加了搜索过程的灵活性,而且能以较大概率收敛于最优解,具有较好的全局优化求解能力。但,交叉概率、变异概率等参数也会影响算法的搜索结果和搜索效率,所以如何选择遗传算法的参数在其应用中是一个比较重要的问题。
综上,由于遗传算法的整体搜索策略和优化搜索方式在计算时不依赖于梯度信息或其他辅助知识,只需要求解影响搜索方向的目标函数和相应的适应度函数,所以遗传算法提供了一种求解复杂系统问题的通用框架。它不依赖于问题的具体领域,对问题的种类有很强的鲁棒性,所以广泛应用于各种领域,包括:函数优化、组合优化生产调度问题、自动控制
、机器人学、图像处理(图像恢复、图像边缘特征提取…)、人工生命、遗传编程、机器学习。

3 遗传算法的基本流程及实现技术
基本遗传算法(Simple Genetic Algorithms,SGA)只使用选择算子、交叉算子和变异算子这三种遗传算子,进化过程简单,是其他遗传算法的基础。

3.1 遗传算法的基本流程
通过随机方式产生若干由确定长度(长度与待求解问题的精度有关)编码的初始群体;
通过适应度函数对每个个体进行评价,选择适应度值高的个体参与遗传操作,适应度低的个体被淘汰;
经遗传操作(复制、交叉、变异)的个体集合形成新一代种群,直到满足停止准则(进化代数GEN>=?);
将后代中变现最好的个体作为遗传算法的执行结果。
在这里插入图片描述
其中,GEN是当前代数;M是种群规模,i代表种群数量。

3.2 遗传算法的实现技术
基本遗传算法(SGA)由编码、适应度函数、遗传算子(选择、交叉、变异)及运行参数组成。
3.2.1 编码
(1)二进制编码
二进制编码的字符串长度与问题所求解的精度有关。需要保证所求解空间内的每一个个体都可以被编码。
优点:编、解码操作简单,遗传、交叉便于实现
缺点:长度大
(2)其他编码方法
格雷码、浮点数编码、符号编码、多参数编码等
3.2.2 适应度函数
适应度函数要有效反映每一个染色体与问题的最优解染色体之间的差距。
3.2.3选择算子
在这里插入图片描述
3.2.4 交叉算子
交叉运算是指对两个相互配对的染色体按某种方式相互交换其部分基因,从而形成两个新的个体;交叉运算是遗传算法区别于其他进化算法的重要特征,是产生新个体的主要方法。在交叉之前需要将群体中的个体进行配对,一般采取随机配对原则。
常用的交叉方式:
单点交叉
双点交叉(多点交叉,交叉点数越多,个体的结构被破坏的可能性越大,一般不采用多点交叉的方式)
均匀交叉
算术交叉
3.2.5 变异算子
遗传算法中的变异运算是指将个体染色体编码串中的某些基因座上的基因值用该基因座的其他等位基因来替换,从而形成一个新的个体。

就遗传算法运算过程中产生新个体的能力方面来说,交叉运算是产生新个体的主要方法,它决定了遗传算法的全局搜索能力;而变异运算只是产生新个体的辅助方法,但也是必不可少的一个运算步骤,它决定了遗传算法的局部搜索能力。交叉算子与变异算子的共同配合完成了其对搜索空间的全局搜索和局部搜索,从而使遗传算法能以良好的搜索性能完成最优化问题的寻优过程。

3.2.6 运行参数
在这里插入图片描述
4 遗传算法的基本原理
4.1 模式定理
在这里插入图片描述
4.2 积木块假设
具有低阶、定义长度短,且适应度值高于群体平均适应度值的模式称为基因块或积木块。
积木块假设:个体的基因块通过选择、交叉、变异等遗传算子的作用,能够相互拼接在一起,形成适应度更高的个体编码串。
积木块假设说明了用遗传算法求解各类问题的基本思想,即通过积木块直接相互拼接在一起能够产生更好的解。

二、源代码

%
%     
%输入input:               文本文件[序号,x坐标,y坐标]
%输出bestRoute:           全局最优路线
%输出bestL:               全局最优路线对应的路径长度
function [bestRoute,bestL]=SAGA_TSP(filename)
%% 输入数据
input=importdata(filename);
n=size(input,1);                        %n-城市数目
vertexs=input(:,2:3);                   %城市xy坐标
x=vertexs(:,1);                         %x坐标
y=vertexs(:,2);                         %y坐标
h=pdist(vertexs);
dist=squareform(h);                     %距离矩阵
%% 遗传算法参数设置
NIND=50;                                %种群大小
MAXGEN=10;                             %迭代次数
GGAP=0.9;                               %代沟
Pc=0.8;                                 %交叉概率
Pm=0.2;                                 %变异概率
pSwap=0.2;                              %选择交换结构的概率
pReversion=0.5;                         %选择逆转结构的概率
pInsertion=1-pSwap-pReversion;          %选择插入结构的概率
N=n;                                    %染色体长度=城市数目
%% 模拟退火算法参数
MaxOutIter=300;                         %外层循环最大迭代次数
MaxInIter=15;                           %里层循环最大迭代次数
T0=0.025;                               %初始温度
alpha=0.99;                             %冷却因子
%% 种群初始化
Chrom=InitPop(NIND,N);
%% 优化
gen=1;                                  %计数器
bestChrom=Chrom(1,:);                   %初始全局最优个体
bestL=RouteLength(bestChrom,dist);      %初始全局最优个体的总距离
BestChrom=zeros(MAXGEN,N);              %记录每次迭代过程中全局最优个体
BestL=zeros(MAXGEN,1);                  %记录每次迭代过程中全局最优个体的总距离
while gen<=MAXGEN
    %% 计算目标函数值
    ObjV=ObjFunction(Chrom,dist);
    %% 二元锦标赛选择
    SelCh=BinaryTourment_Select(Chrom,GGAP,ObjV);
    %% OX交叉
    SelCh=Recombin(SelCh,Pc);
    %% 变异
    SelCh=Mutate(SelCh,Pm,pSwap,pReversion,pInsertion);
    %% 对种群中前30%的个体都进行模拟退火操作
    SelCh=SA_Chrom(SelCh,dist,MaxOutIter,MaxInIter,T0,alpha,pSwap,pReversion,pInsertion);
    %% 重插入子代的新种群
    Chrom=Reins(Chrom,SelCh,ObjV);
    %% 计算当前代所有个体总距离
    Obj=ObjFunction(Chrom,dist);
    %% 找出当前代中最优个体
    [minObj,minIndex]=min(Obj);
    %% 将当前代中最优个体与全局最优个体进行比较,如果当前代最优个体更好,则将全局最优个体进行替换
    if minObj<=bestL
        bestChrom=Chrom(minIndex,:);
        bestL=minObj;
    end
    %% 记录每一代全局最优个体,及其总距离
    BestChrom(gen,:)=bestChrom;
    BestL(gen,:)=bestL;
    %% 显示外层循环每次迭代的信全局最优路线的总距离
    disp(['第' num2str(gen) '次迭代:全局最优路线总距离 = ' num2str(bestL)]);
    %% 画出每次迭代的全局最优路线图
    figure(1);
    PlotRoute(bestChrom,x,y)
    pause(0.01);
    %% 计数器加1
    gen=gen+1;
end
%% 对一个个体进行模拟退火操作
%输入Individual:          种群中的一个个体
%输入dist:                距离矩阵
%输入MaxOutIter:          模拟退火外层循环最大迭代次数
%输入MaxInIter:           模拟退火里层循环最大迭代次数
%输入T0:                  初始温度
%输入alpha:               冷却因子
%输入pSwap:               选择交换结构的概率
%输入pReversion:          选择逆转结构的概率
%输入pInsertion:          选择插入结构的概率
%输出newIndividual:       经模拟退火操作后的新个体
function newIndividual=SA_Individual(Individual,dist,MaxOutIter,MaxInIter,T0,alpha,pSwap,pReversion,pInsertion)
%% 初始化
currRoute=Individual;               %当前个体所对应的解
currL=RouteLength(currRoute,dist);  %初始解总距离
bestRoute=currRoute;                %初始将初始解赋值给全局最优解
bestL=currL;                        %初始将初始解总距离赋值给全局最优解总距离
T=T0;                               %温度初始化
%% 模拟退火
for outIter=1:MaxOutIter
    for inIter=1:MaxInIter
        newRoute=Neighbor(currRoute,pSwap,pReversion,pInsertion);       %经过邻域结构后产生的新的路线
        newL=RouteLength(newRoute,dist);                                %该路线的总距离
        %如果新路线比当前路线更好,则更新当前路线,以及当前路线总距离
        if newL<=currL 
            currRoute=newRoute; 
            currL=newL;
        else 
            %如果新路线不如当前路线好,则采用退火准则,以一定概率接受新路线
            delta=(newL-currL)/currL;           %计算新路线与当前路线总距离相差的百分比
            P=exp(-delta/T);                    %计算接受新路线的概率
            %如果0~1的随机数小于P,则接受新路线,并更新当前路线,以及当前路线总距离
            if rand<=P
                currRoute=newRoute; 
                currL=newL;
            end
        end
        %将当前路线与全局最优路线进行比较,如果当前路线更好,则更新全局最优路线,以及全局最优路线总距离
        if currL<=bestL
            bestRoute=currRoute;
            bestL=currL;
        end
    end
    %更新当前温度
    T=alpha*T;
end
newIndividual=bestRoute;                %把bestRoute赋值给newIndividual,更新个体Individual
end
function newChrom=SA_Chrom(Chrom,dist,MaxOutIter,MaxInIter,T0,alpha,pSwap,pReversion,pInsertion)
NIND=size(Chrom,1);         %个体数目
Obj=ObjFunction(Chrom,dist);%计算种群的目标函数值
[~,index]=sort(Obj);        %将种群按照目标函数值从小打大的顺序进行排序
SA_num=ceil(NIND*0.3);      %选择前30%的个体进行模拟退火操作
SA_Chrom=Chrom(index(1:SA_num),:);  %进行模拟退火操作的个体
newChrom=Chrom;             %将新种群初始化为旧种群
for i=1:SA_num
    Individual=SA_Chrom(i,:);  %SA_Chrom中第i个个体,即Chrom中的第index(i)个个体
    %将SA_Chrom中第i个个体进行模拟退火操作后生成的新个体
    newIndividual=SA_Individual(Individual,dist,MaxOutIter,MaxInIter,T0,alpha,pSwap,pReversion,pIns ;
    newChrom(index(i),:)=newIndividual;    %更新新种群的第index(i)个个体
end
end

三、运行结果

在这里插入图片描述
在这里插入图片描述

四、备注

版本:2014a