【TWVRP】基于matlab遗传算法求解带时间窗且车辆速度车辆路径规划问题【含Matlab源码 2094期】

⛄一、VRP简介

1 VRP基本原理
车辆路径规划问题(Vehicle Routing Problem，VRP)是运筹学里重要的研究问题之一。VRP关注有一个供货商与K个销售点的路径规划的情况，可以简述为：对一系列发货点和收货点，组织调用一定的车辆，安排适当的行车路线，使车辆有序地通过它们，在满足指定的约束条件下（例如：货物的需求量与发货量，交发货时间，车辆容量限制，行驶里程限制，行驶时间限制等），力争实现一定的目标（如车辆空驶总里程最短，运输总费用最低，车辆按一定时间到达，使用的车辆数最小等）。
VRP的图例如下所示：

2 问题属性与常见问题
车辆路径问题的特性比较复杂，总的来说包含四个方面的属性：
（1）地址特性包括：车场数目、需求类型、作业要求。
（2）车辆特性包括：车辆数量、载重量约束、可运载品种约束、运行路线约束、工作时间约束。
（3）问题的其他特性。
（4）目标函数可能是总成本极小化，或者极小化最大作业成本，或者最大化准时作业。

3 常见问题有以下几类：
（1）旅行商问题
（2）带容量约束的车辆路线问题(CVRP)

该模型很难拓展到VRP的其他场景,并且不知道具体车辆的执行路径，因此对其模型继续改进。

（3）带时间窗的车辆路线问题
由于VRP问题的持续发展，考虑需求点对于车辆到达的时间有所要求之下，在车辆途程问题之中加入时窗的限制，便成为带时间窗车辆路径问题（VRP with Time Windows, VRPTW）。带时间窗车辆路径问题（VRPTW）是在VRP上加上了客户的被访问的时间窗约束。在VRPTW问题中，除了行驶成本之外, 成本函数还要包括由于早到某个客户而引起的等待时间和客户需要的服务时间。在VRPTW中，车辆除了要满足VRP问题的限制之外，还必须要满足需求点的时窗限制，而需求点的时窗限制可以分为两种，一种是硬时窗（Hard Time Window），硬时窗要求车辆必须要在时窗内到达，早到必须等待，而迟到则拒收；另一种是软时窗（Soft Time Window），不一定要在时窗内到达，但是在时窗之外到达必须要处罚，以处罚替代等待与拒收是软时窗与硬时窗最大的不同。

模型2(参考2017 A generalized formulation for vehicle routing problems)：
该模型为2维决策变量

（4）收集和分发问题
（5）多车场车辆路线问题
参考(2005 lim，多车场车辆路径问题的遗传算法_邹彤, 1996 renaud)

由于车辆是同质的，这里的建模在变量中没有加入车辆的维度。

（6）优先约束车辆路线问题
（7）相容性约束车辆路线问题
（8）随机需求车辆路线问题

4 解决方案
（1）数学解析法
（2）人机交互法
（3）先分组再排路线法
（4）先排路线再分组法
（5）节省或插入法
（6）改善或交换法
（7）数学规划近似法
（8）启发式算法

5 VRP与VRPTW对比

⛄二、部分源代码

clear
clc
close all
tic
%% 用importdata这个函数来读取文件
c101=importdata(‘c101.txt’);
c102=importdata(‘c102.txt’);
c103=importdata(‘c103.txt’);
cap=200; %车辆最大装载量
v_num=4; %车辆最多使用数目

%% 提取配送中心1数据信息
E1=c101(1,5); %配送中心时间窗开始时间
L1=c101(1,6); %配送中心时间窗结束时间
vertexs1=c101(:,2:3); %所有点的坐标x和y
customer1=vertexs1(2:end,:); %顾客坐标
cusnum1=size(customer1,1); %顾客数
demands1=c101(2:end,4); %需求量
a1=c101(2:end,5); %顾客时间窗开始时间[a[i],b[i]]
b1=c101(2:end,6); %顾客时间窗结束时间[a[i],b[i]]
s1=c101(2:end,7); %客户点的服务时间
h1=pdist(vertexs1);
dist1=squareform(h1); %距离矩阵，满足三角关系，暂用距离表示花费c[i][j]=dist[i][j]
%% 提取配送中心2数据信息
E2=c102(1,5); %配送中心时间窗开始时间
L2=c102(1,6); %配送中心时间窗结束时间
vertexs2=c102(:,2:3); %所有点的坐标x和y
customer2=vertexs2(2:end,:); %顾客坐标
cusnum2=size(customer2,1); %顾客数
demands2=c102(2:end,4); %需求量
a2=c102(2:end,5); %顾客时间窗开始时间[a[i],b[i]]
b2=c102(2:end,6); %顾客时间窗结束时间[a[i],b[i]]
s2=c102(2:end,7); %客户点的服务时间
h2=pdist(vertexs2);
dist2=squareform(h2); %距离矩阵，满足三角关系，暂用距离表示花费c[i][j]=dist[i][j]
%% 提取配送中心3数据信息
E3=c103(1,5); %配送中心时间窗开始时间
L3=c103(1,6); %配送中心时间窗结束时间
vertexs3=c103(:,2:3); %所有点的坐标x和y
customer3=vertexs3(2:end,:); %顾客坐标
cusnum3=size(customer3,1); %顾客数
demands3=c103(2:end,4); %需求量
a3=c103(2:end,5); %顾客时间窗开始时间[a[i],b[i]]
b3=c103(2:end,6); %顾客时间窗结束时间[a[i],b[i]]
s3=c103(2:end,7); %客户点的服务时间
h3=pdist(vertexs3);
dist3=squareform(h3); %距离矩阵，满足三角关系，暂用距离表示花费c[i][j]=dist[i][j]

%% 遗传算法参数设置
alpha=5; %违反的容量约束的惩罚函数系数
belta=5; %违反时间窗约束的惩罚函数系数
NIND=30; %种群大小
MAXGEN=100; %迭代次数
Pc=0.7; %交叉概率
Pm=0.1; %变异概率
GGAP=0.9; %代沟(Generation gap)
N1=cusnum1+v_num-1; %染色体长度=顾客数目+车辆最多使用数目-1
N2=cusnum2+v_num-1; %染色体长度=顾客数目+车辆最多使用数目-1
N3=cusnum3+v_num-1; %染色体长度=顾客数目+车辆最多使用数目-1
%% 初始化种群
init_vc1=init(cusnum1,a1,demands1,cap); %构造初始解
Chrom1=InitPopCW(NIND,N1,cusnum1,init_vc1);

init_vc2=init(cusnum2,a2,demands2,cap); %构造初始解
Chrom2=InitPopCW(NIND,N2,cusnum2,init_vc2);

init_vc3=init(cusnum3,a3,demands3,cap); %构造初始解
Chrom3=InitPopCW(NIND,N3,cusnum3,init_vc3);
%% 输出随机解的路线和总距离
disp(‘初始种群中的一个随机值:’)
[VC1,NV1,TD1,violate_num1,violate_cus1]=decode(Chrom1(1,:),cusnum1,cap,demands1,a1,b1,L1,s1,dist1);
[VC2,NV2,TD2,violate_num2,violate_cus2]=decode(Chrom2(1,:),cusnum2,cap,demands2,a2,b2,L2,s2,dist2);
[VC3,NV3,TD3,violate_num3,violate_cus3]=decode(Chrom3(1,:),cusnum3,cap,demands3,a3,b3,L3,s3,dist3);
% disp([‘总距离：’,num2str(TD)]);
% disp([‘车辆使用数目：’,num2str(NV),‘，车辆行驶总距离：’,num2str(TD),‘，违反约束路径数目：’,num2str(violate_num),‘，违反约束顾客数目：’,num2str(violate_cus)]);
% disp(‘~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~’)
%% 优化
gen=1;
figure;
hold on;box on
xlim([0,MAXGEN])
title(‘优化过程’)
xlabel(‘代数’)
ylabel(‘最优值’)
ObjV1=calObj(Chrom1,cusnum1,cap,demands1,a1,b1,L1,s1,dist1,alpha,belta); %计算种群目标函数值
preObjV1=min(ObjV1);
ObjV2=calObj(Chrom2,cusnum2,cap,demands2,a2,b2,L2,s2,dist2,alpha,belta); %计算种群目标函数值
preObjV2=min(ObjV2);
ObjV3=calObj(Chrom3,cusnum3,cap,demands3,a3,b3,L3,s3,dist3,alpha,belta); %计算种群目标函数值
preObjV3=min(ObjV3);
while gen<=MAXGEN
%% 计算适应度

ObjV1=calObj(Chrom1,cusnum1,cap,demands1,a1,b1,L1,s1,dist1,alpha,belta);             %计算种群目标函数值
preObjV1=min(ObjV1);
ObjV2=calObj(Chrom2,cusnum2,cap,demands2,a2,b2,L2,s2,dist2,alpha,belta);             %计算种群目标函数值
preObjV2=min(ObjV2);
ObjV3=calObj(Chrom3,cusnum3,cap,demands3,a3,b3,L3,s3,dist3,alpha,belta);             %计算种群目标函数值
preObjV3=min(ObjV3);
FitnV1=Fitness(ObjV1);
FitnV2=Fitness(ObjV2);
FitnV3=Fitness(ObjV3);
%% 选择
SelCh1=Select(Chrom1,FitnV2,GGAP);
SelCh2=Select(Chrom2,FitnV3,GGAP);
SelCh3=Select(Chrom3,FitnV3,GGAP);
%% OX交叉操作
SelCh1=Recombin(SelCh1,Pc);
SelCh2=Recombin(SelCh2,Pc);
SelCh3=Recombin(SelCh3,Pc);
%% 变异
SelCh1=Mutate(SelCh1,Pm);
SelCh2=Mutate(SelCh2,Pm);
SelCh3=Mutate(SelCh3,Pm);
%% 局部搜索操作
SelCh1=LocalSearch(SelCh1,cusnum1,cap,demands1,a1,b1,L1,s1,dist1,alpha,belta);
SelCh2=LocalSearch(SelCh2,cusnum2,cap,demands2,a2,b2,L2,s2,dist2,alpha,belta);
SelCh3=LocalSearch(SelCh3,cusnum3,cap,demands3,a3,b3,L3,s3,dist3,alpha,belta);

⛄三、运行结果

⛄四、matlab版本及参考文献

1 matlab版本
2014a

2 参考文献
[1]周景欣.遗传算法求解带时间窗的车辆路径问题[J].中国储运. 2023(01)

3 备注
简介此部分摘自互联网，仅供参考，若侵权，联系删除