✅博主简介：热爱科研的Matlab仿真开发者，修心和技术同步精进，Matlab项目合作可私信。
🍎个人主页：海神之光
🏆代码获取方式：
海神之光Matlab王者学习之路—代码获取方式
⛳️座右铭：行百里者，半于九十。
更多Matlab仿真内容点击👇
Matlab图像处理（进阶版）
路径规划（Matlab）
神经网络预测与分类（Matlab）
优化求解（Matlab）
语音处理（Matlab）
信号处理（Matlab）
车间调度（Matlab）
⛄一、蜣螂算法无人机避障三维航迹规划简介
1 无人机航迹规划问题的数学模型
建立三维航迹规划问题的数学模型时, 不但考虑无人机基本约束, 还考虑复杂的飞行环境, 包括山体地形和雷暴威胁区。
1.1 无人机基本约束
规划的无人机三维航迹, 通常需要满足一些基本约束, 包括最大转弯角、最大爬升角或下滑角、最小航迹段长度、最低和最高飞行高度, 以及最大航迹长度等约束。其中, 最大转弯角约束, 是指无人机只能在水平面内小于或等于指定的最大转弯角内转弯;最大爬升角或下滑角约束, 是指无人机只能在垂直平面内小于或等于指定的最大爬升角或下滑角内爬升或下滑;最小航迹段长度约束, 要求无人机改变飞行姿态之前, 按目前的航迹方向飞行的最短航程;最低和最高飞行高度约束, 要求无人机在指定的飞行高度区间飞行;最大航迹长度约束, 是指无人机的航迹长度小于或等于指定的阈值。
记q (x, y, z, θ, ψ) 为无人机的飞行位置与姿态, 其中, (x, y, z) 为无人机的位置, θ为无人机的水平转弯角, ψ为无人机的竖直爬升角或下滑角, 进而建立上述基本约束的数学表达式。
1.2 飞行环境障碍物和威胁区建模
在飞行环境中, 高耸的山体近似采用圆锥体等效表示, 用以e为底的自然指数图形生成, 那么, 山体地形可以通过多个位置不同的圆锥体叠加而成。若将参考海拔基准高度设置为xOy平面, 记 (x, y, z) 为山体地形中的点, 那么
式中:N为山体个数;xk0和yk0为第k座山体中心对称轴的横坐标和纵坐标;hk为第k座山体的最大高度;xki和yki为第k座山体的横向斜度和纵向斜度。
在飞行环境中, 山体附近通常存在雷暴等极端气象, 本文视为飞行威胁区, 并通过球体近似等效表示, 且记第k座山体附近飞行威胁区的球心坐标为 (xks0, yks0, zks0) , 半径为rk。
1.3 目标函数及航迹表示
在本文中, 执行任务的某型无人机, 其航迹规划的目标函数是生成一条由起始点到目标点的无碰撞可行航迹。采用q (x, y, z, θ, ψ) 表示无人机在飞行空域中某特定位置的特定姿态, 那么 (x, y, z) 则表示无人机所在航迹点, θ表示无人机的水平转弯角, ψ表示无人机的竖直爬升角或下滑角。采用r (q) 表示由起始点qinitial到目标点qgoal的无碰撞可行航迹, 那么航迹规划的过程可以写成如下形式:
2 蜣螂算法
摘要：蜣螂优化算法( Dung beetle optimizer, DBO), 是由 Jiankai Xue 等于2022 年提出的一种群体智能优化算法。其灵感来源于蜣螂的生物行为过程，具有寻优能力强，收敛速度快的特点。
1 蜣螂优化算法
众所周知，蜣螂是自然界中一种常见的昆虫，动物的粪便为食，在全世界内分布广泛，扮演着自然界中分解者的角色，对生态系统平衡起着至关重要的作用。蜣螂有一个有趣的习惯，它们会把粪便捏成球，然后把它滚出来，目的是能够尽可能快速、有效地移动粪球，防止被其他蜣螂抢夺。蜣螂的可以利用天体线索(特别是太阳、月亮和偏振光)来导航，让粪球沿着直线滚动，如果完全没有光源(也就是在完全黑暗的环境中)，蜣螂的就不再走直线，而是弯曲的，有时甚至略圆，有很多因素(如风、地面不平)都会导致蜣螂偏离原来的方向，蜣螂在滚粪球的过程如遇到障碍物而无法前进时，通常会爬到粪球上面"跳舞"(包括一系列的旋转和停顿)，决定它们的运动方向。
从蜣螂的习性中观察发现，其获取粪球主要有以下两个目的：①用来产卵和养育下一代；②作为食物。蜣螂会把粪球埋起来，雌性蜣螂会在粪球里产卵，粪球不仅是蜣螂幼虫的发育场所，也是必需的食物。所以，粪球对蜣螂的生存起着不可替代的作用。
本位介绍了一种新的群体智能优化算法------DBO（Dung beetle optimizer）技术，其灵感主要来源于蜣螂的滚球、跳舞、觅食、偷窃、和繁殖等行为。
1.1 结构和算法
根据上面的讨论，蜣螂在滚动过程中需要通过天体线索导航，以保持粪球在直线路径上滚动。为了模拟滚球行为，要求蜣螂在整个搜索空间中沿着给定的方向移动。蜣螂的运动轨迹如图1所示。在图1中，蜣螂利用太阳来导航，其中红色箭头表示的是滚动的方向,同时，我们假设光源的强度也会影响蜣螂的路径。
1.2 计算步骤
DBO 算法作为一种新颖的基于 SI 的优化技术, 主要有六个步骤:
(1) 初始化蜣螂群和 DBO 算法的参数;
(2) 根据目标函数计算出所有目标代理的适应度值;
(3) 更新所有蛲螂的位置;
(4) 判断每个目标代理是否超出边界;
(5) 更新当前最优解及其适应度值;
(6) 重复上述步骤, 直到 t 满足终止准则, 输出全局最优解及其适应度值。
⛄二、部分源代码
% Dung Beetle Optimizer: (DBO) (demo)
% Programmed by Jian-kai Xue
% Updated 28 Nov. 2022.
%
% This is a simple demo version only implemented the basic
% idea of the DBO for solving the unconstrained problem.
% The details about DBO are illustratred in the following paper.
% (To cite this article):
% Jiankai Xue & Bo Shen (2022) Dung beetle optimizer: a new meta-heuristic
% algorithm for global optimization. The Journal of Supercomputing, DOI:
% 10.1007/s11227-022-04959-6
clc,clear , close all
feature jit off
%% 模型基本参数 基于蜣螂优化算法的三维无人机路径优化
% 载入地形 矩阵
filename = ‘TestData1.xlsx’ ;
model.x_data = xlsread( filename , ‘Xi’) ;
model.y_data = xlsread(filename, ‘Yi’) ;
model.z_data = xlsread( filename , ‘Zi’) ;
model.x_grid = model.x_data(1,:) ;
model.y_grid =model.y_data(:, 1) ;
%起点 相关信息
model.xs = 10 ;
model.ys = 90 ;
model.zs = interp2( model.x_data , model.y_data, model.z_data , …
model.xs , model.ys ,‘linear’ ) ; % 高度为插值得到
% 终点 相关信息
model.xt = 130 ;
model.yt = 10 ;
model.zt = interp2( model.x_data , model.y_data, model.z_data , …
model.xt , model.yt , ‘linear’); % 高度为插值得到
model.n= 5 ; % 粗略导航点设置
model.nn= 80 ; % 插值法获得的导航点总数
model.Safeh = 0.0 ; % 与障碍物的最低飞行高度
% 导航点 边界值
model.xmin= min( model.x_data( : ) ) ;
model.xmax= max ( model.x_data( : ) ) ;
model.ymin= min( model.y_data( : ) ) ;
model.ymax= max( model.y_data( : ) ) ;
model.zmin= min( model.z_data( : ) ) ;
model.zmax =model.zmin + (1+ 0.1)*( max( model.z_data(😃 )-model.zmin ) ;
% 模型的其他参数
model.nVar = 3*model.n ; % 编码长度
model.pf = 10^4 ; % 惩罚系数
% 障碍物 位置坐标及半径
model.Barrier = [10,60 , 5;
40, 50,6
60, 50 , 5
100, 30, 8 ] ;
model.Num_Barrier = size(model.Barrier , 1 ); % 障碍物的数目
model.weight1 = 0.5; % 权重1 飞行线路长度权重
model.weight2 = 0.3; % 权重2 飞行高度相关权重
model.weight3 = 0.2; % 权重3 Jsmooth 指标权重
%% 算法参数设置
nPop = 30; % 种群规模
MaxIt = 200; % 最大迭代次数
% param.hPercent = 0.7; %
% param.mPercent = 0.5; %
VarMin = 0 ; % 自变量取值 低阶
VarMax= 1 ;% 自变量取值 高阶
nVar=15;
%% 运行算法
CostFunction = @(x) MyCost(x,model); % 设置目标函数
[ BestSol , BestCost ] = DBO( nPop,MaxIt ,VarMin, VarMax,nVar, CostFunction ) ;
% 绘制线路图
gcf = figure(1);
% Plot Solution
set(gcf, ‘unit’ ,‘centimeters’ ,‘position’,[5 2 25 15 ]);
PlotSolution( BestSol , BestCost ,model)
figure
mesh( model.x_data , model.y_data , model.z_data ); hold on
colorbar; box on ,
set(gcf,‘Color’,[1 1 1]);
% set(gcf, ‘unit’ , ‘centimeters’,‘position’ , [2 2 30 15]);
h3= plot3( BestSol.sol.xx , BestSol.sol.yy , BestSol.sol.zz , ‘-r’); hold on
% temp = 10^-2 ;
h1 = plot3( model.xs, model.ys, model.zs, ‘o’ , ‘MarkerEdgeColor’,‘r’, …
‘MarkerFaceColor’,‘r’); hold on
h2 = plot3( model.xt , model.yt , model.zt, ‘^’ , ‘MarkerEdgeColor’,‘r’, …
‘MarkerFaceColor’,‘r’); hold on
if isfield( model ,‘Barrier’)
for ind = 1: model.Num_Barrier
[X,Y,Z] = cylinder( model.Barrier(ind, 3) ,100);
h4= surf(X+model.Barrier(ind, 1),Y+model.Barrier(ind, 2), model.zmin+Z*( max(model.z_data(😃)- model.zmin) ) ; hold on
set(h4, ‘edgecolor’,‘m’,‘facecolor’, ‘m’) ;
end
end
if ~isfield( model ,‘Barrier’)
legend( [ h1 , h2 , h3] , ‘起点’ , ‘终点’ , ‘线路’, ‘Location’,‘southoutside’ , ‘Orientation’,‘horizontal’)
else
legend( [ h1 , h2 , h3 h4] , ‘起点’ , ‘终点’ , ‘线路’ , ‘无法通行区域’ , ‘Location’,‘southoutside’, ‘Orientation’,‘horizontal’)
end
xlabel(‘x / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
ylabel(‘y / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
zlabel(‘z / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
set(gca, ‘xlim’ , [ model.xmin model.xmax]) ;
set(gca, ‘ylim’ , [ model.ymin model.ymax]) ;
axis tight
axis normal
hold off
set(gca, ‘cameraposition’, [-337 , 0 , 14.2])
%%
figure
mesh( model.x_data , model.y_data , model.z_data ); hold on
view(2)
% contour( model.x_data , model.y_data , model.z_data ); hold on
colorbar; box on ,
set(gcf,‘Color’,[1 1 1]);
% set(gcf, ‘unit’ , ‘centimeters’,‘position’ , [2 2 30 15]);
h3= plot3( BestSol.sol.xx , BestSol.sol.yy , BestSol.sol.zz , ‘-r’); hold on
% temp = 10^-2 ;
h1 = plot3( model.xs, model.ys, model.zs, ‘o’ , ‘MarkerEdgeColor’,‘b’, …
‘MarkerFaceColor’,‘b’); hold on
h2 = plot3( model.xt , model.yt , model.zt, ‘^’ , ‘MarkerEdgeColor’,‘g’, …
‘MarkerFaceColor’,‘g’); hold on
% legend( [ h1 , h2 , h3] , ‘起点’ , ‘终点’ , ‘线路’, ‘Location’,‘southoutside’ , ‘Orientation’,‘horizontal’)
if isfield( model ,‘Barrier’)
for ind = 1: model.Num_Barrier
[X,Y,Z] = cylinder( model.Barrier(ind, 3) ,100);
h4= surf(X+model.Barrier(ind, 1),Y+model.Barrier(ind, 2), model.zmin+Z*( max(model.z_data(😃)- model.zmin) ) ; hold on
set(h4, ‘edgecolor’,‘m’,‘facecolor’, ‘m’) ;
end
end
if ~isfield( model ,‘Barrier’)
legend( [ h1 , h2 , h3] , ‘起点’ , ‘终点’ , ‘线路’, ‘Location’,‘southoutside’ , ‘Orientation’,‘horizontal’)
else
legend( [ h1 , h2 , h3 h4] , ‘起点’ , ‘终点’ , ‘线路’ , ‘无法通行区域’ , ‘Location’,‘southoutside’, ‘Orientation’,‘horizontal’)
end
xlabel(‘x / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
ylabel(‘y / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
zlabel(‘z / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
set(gca, ‘xlim’ , [ model.xmin model.xmax]) ;
set(gca, ‘ylim’ , [ model.ymin model.ymax]) ;
axis tight
axis normal
hold off
%%
figure
% mesh( model.x_data , model.y_data , model.z_data ); hold on
% view(2)
contour( model.x_data , model.y_data , model.z_data ); hold on
colorbar; box on ,
set(gcf,‘Color’,[1 1 1]);
% set(gcf, ‘unit’ , ‘centimeters’,‘position’ , [2 2 30 15]);
h3= plot3( BestSol.sol.xx , BestSol.sol.yy , BestSol.sol.zz , ‘-r’); hold on
% temp = 10^-2 ;
h1 = plot3( model.xs, model.ys, model.zs, ‘o’ , ‘MarkerEdgeColor’,‘b’, …
‘MarkerFaceColor’,‘b’); hold on
h2 = plot3( model.xt , model.yt , model.zt, ‘^’ , ‘MarkerEdgeColor’,‘g’, …
‘MarkerFaceColor’,‘g’); hold on
% legend( [ h1 , h2 , h3] , ‘起点’ , ‘终点’ , ‘线路’, ‘Location’,‘southoutside’ , ‘Orientation’,‘horizontal’)
if isfield( model ,‘Barrier’)
for ind = 1: model.Num_Barrier
[X,Y,Z] = cylinder( model.Barrier(ind, 3) ,100);
h4= surf(X+model.Barrier(ind, 1),Y+model.Barrier(ind, 2), model.zmin+Z*( max(model.z_data(😃)- model.zmin) ) ; hold on
xlabel(‘x / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
ylabel(‘y / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
zlabel(‘z / km’,‘fontsize’,10 ,‘fontname’,‘宋体’);
set(gca, ‘xlim’ , [ model.xmin model.xmax]) ;
set(gca, ‘ylim’ , [ model.ymin model.ymax]) ;
axis tight
axis normal
hold off
%% 收敛曲线
figure
% semilogy( BestSol.BestCost ,‘LineWidth’,2);
plot( BestCost ,‘LineWidth’,2);
xlabel(‘迭代次数’);
ylabel(‘目标函数’);
grid on;
% set(gca,‘XLim’,[0 BestSol.MaxIt]);%X轴的数据显示范围
⛄三、运行结果
⛄四、matlab版本及参考文献
1 matlab版本
2014a
2 参考文献
[1]田疆,李二超.用于无人机三维航迹规划改进连接型快速扩展随机树算法[J].航空工程进展. 2018,9(04)
3 备注
简介此部分摘自互联网，仅供参考，若侵权，联系删除
🍅 仿真咨询
1 各类智能优化算法改进及应用
生产调度、经济调度、装配线调度、充电优化、车间调度、发车优化、水库调度、三维装箱、物流选址、货位优化、公交排班优化、充电桩布局优化、车间布局优化、集装箱船配载优化、水泵组合优化、解医疗资源分配优化、设施布局优化、可视域基站和无人机选址优化
2 机器学习和深度学习方面
卷积神经网络（CNN）、LSTM、支持向量机（SVM）、最小二乘支持向量机（LSSVM）、极限学习机（ELM）、核极限学习机（KELM）、BP、RBF、宽度学习、DBN、RF、RBF、DELM、XGBOOST、TCN实现风电预测、光伏预测、电池寿命预测、辐射源识别、交通流预测、负荷预测、股价预测、PM2.5浓度预测、电池健康状态预测、水体光学参数反演、NLOS信号识别、地铁停车精准预测、变压器故障诊断
3 图像处理方面
图像识别、图像分割、图像检测、图像隐藏、图像配准、图像拼接、图像融合、图像增强、图像压缩感知
4 路径规划方面
旅行商问题（TSP）、车辆路径问题（VRP、MVRP、CVRP、VRPTW等）、无人机三维路径规划、无人机协同、无人机编队、机器人路径规划、栅格地图路径规划、多式联运运输问题、车辆协同无人机路径规划、天线线性阵列分布优化、车间布局优化
5 无人机应用方面
无人机路径规划、无人机控制、无人机编队、无人机协同、无人机任务分配
6 无线传感器定位及布局方面
传感器部署优化、通信协议优化、路由优化、目标定位优化、Dv-Hop定位优化、Leach协议优化、WSN覆盖优化、组播优化、RSSI定位优化
7 信号处理方面
信号识别、信号加密、信号去噪、信号增强、雷达信号处理、信号水印嵌入提取、肌电信号、脑电信号、信号配时优化
8 电力系统方面
微电网优化、无功优化、配电网重构、储能配置
9 元胞自动机方面
交通流 人群疏散 病毒扩散 晶体生长
10 雷达方面
卡尔曼滤波跟踪、航迹关联、航迹融合
734
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
