优化算法莱维飞行和随机游动策略的灰狼算法含Matlab源码 1500期

Posted 2022-01-07 紫极神光

一、获取代码方式

获取代码方式1：
完整代码已上传我的资源：【优化算法】莱维飞行和随机游动策略的灰狼算法【含Matlab源码 1500期】

获取代码方式2：
通过订阅紫极神光博客付费专栏，凭支付凭证，私信博主，可获得此代码。

备注：
订阅紫极神光博客付费专栏，可免费获得1份代码（有效期为订阅日起，三天内有效）；

二、灰狼算法简介

1 前言：
灰狼优化算法（Grey Wolf Optimizer，GWO）由澳大利亚格里菲斯大学学者 Mirjalili 等人于2014年提出来的一种群智能优化算法。该算法受到了灰狼捕食猎物活动的启发而开发的一种优化搜索方法，它具有较强的收敛性能、参数少、易实现等特点。近年来受到了学者的广泛关注，它己被成功地应用到了车间调度、参数优化、图像分类等领域中。
2 算法原理：
灰狼隶属于群居生活的犬科动物，且处于食物链的顶层。灰狼严格遵守着一个社会支配等级关系。如图：

社会等级第一层：狼群中的头狼记为 \\alpha，\\alpha 狼主要负责对捕食、栖息、作息时间等活动作出决策。由于其它的狼需要服从\\alpha 狼的命令，所以 \\alpha 狼也被称为支配狼。另外， \\alpha 狼不一定是狼群中最强的狼，但就管理能力方面来说， \\alpha 狼一定是最好的。

社会等级第二层：\\beta 狼，它服从于 \\alpha 狼，并协助 \\alpha 狼作出决策。在 \\alpha 狼去世或衰老后，\\beta 狼将成为 \\alpha 狼的最候选者。虽然 \\beta 狼服从 \\alpha 狼，但 \\beta 狼可支配其它社会层级上的狼。

社会等级第三层：\\delta 狼，它服从 \\alpha 、\\beta 狼，同时支配剩余层级的狼。\\delta 狼一般由幼狼、哨兵狼、狩猎狼、老年狼及护理狼组成。

社会等级第四层：\\omega 狼，它通常需要服从其它社会层次上的狼。虽然看上去 \\omega 狼在狼群中的作用不大，但是如果没有 \\omega 狼的存在，狼群会出现内部问题如自相残杀。

GWO 优化过程包含了灰狼的社会等级分层、跟踪、包围和攻击猎物等步骤，其步骤具体情况如下所示。

１）社会等级分层（Social Hierarchy）当设计 GWO 时，首先需构建灰狼社会等级层次模型。计算种群每个个体的适应度，将狼群中适应度最好的三匹灰狼依次标记为 \\alpha、\\beta 、\\delta ，而剩下的灰狼标记为 \\omega。也就是说，灰狼群体中的社会等级从高往低排列依次为； \\alpha、\\beta 、\\delta 及 \\omega。GWO 的优化过程主要由每代种群中的最好三个解（即 \\alpha、\\beta 、\\delta ）来指导完成。

２）包围猎物（ Encircling Prey ）灰狼捜索猎物时会逐渐地接近猎物并包围它，该行为的数学模型如下：

式中：t 为当前迭代次数：。表示 hadamard 乘积操作；A 和 C 是协同系数向量；Xp 表示猎物的位置向量； X(t) 表示当前灰狼的位置向量；在整个迭代过程中 a 由2 线性降到 0； r1 和 r2 是 [0，1] 中的随机向量。

３）狩猎（ Hunring）

灰狼具有识别潜在猎物（最优解）位置的能力，搜索过程主要靠 \\alpha、\\beta 、\\delta 灰狼的指引来完成。但是很多问题的解空间特征是未知的，灰狼是无法确定猎物（最优解）的精确位置。为了模拟灰狼（候选解）的搜索行为，假设 \\alpha、\\beta 、\\delta 具有较强识别潜在猎物位置的能力。因此，在每次迭代过程中，保留当前种群中的最好三只灰狼（ \\alpha、\\beta 、\\delta ），然后根据它们的位置信息来更新其它搜索代理（包括 \\omega）的位置。该行为的数学模型可表示如下：

式中：X_\\alpha 、X\\beta 、X\\delta 分别表示当前种群中 \\alpha、\\beta 、\\delta 的位置向量；Ｘ表示灰狼的位置向量；D\\alpha 、D\\beta 、D_\\delta 分别表示当前候选灰狼与最优三条狼之间的距离；当｜A｜＞１时，灰狼之间尽量分散在各区域并搜寻猎物。当｜A｜＜１时，灰狼将集中捜索某个或某些区域的猎物。

从图中可看出，候选解的位置最终落在被 \\alpha、\\beta 、\\delta 定义的随机圆位置内。总的来说， \\alpha、\\beta 、\\delta 需首先预测出猎物（潜
在最优解）的大致位置，然后其它候选狼在当前最优兰只狼的指引下在猎物附近随机地更新它们的位置。

４）攻击猎物（Attacking Prey）构建攻击猎物模型的过程中，根据2)中的公式，ａ值的减少会引起 A 的值也随之波动。换句话说，A 是一个在区间［-a，a］（备注：原作者的第一篇论文里这里是[-2a,2a]，后面论文里纠正为[-a,a]）上的随机向量，其中ａ在迭代过程中呈线性下降。当 A 在［-1，１］区间上时，则捜索代理（Search Agent）的下一时刻位置可以在当前灰狼与猎物之间的任何位置上。

５）寻找猎物（Search for Prey）灰狼主要依赖 \\alpha、\\beta 、\\delta 的信息来寻找猎物。它们开始分散地去搜索猎物位置信息，然后集中起来攻击猎物。对于分散模型的建立，通过｜A｜＞１使其捜索代理远离猎物，这种搜索方式使 GWO 能进行全局搜索。GWO 算法中的另一个搜索系数是Ｃ。从2)中的公式可知，Ｃ向量是在区间范围［０，２］上的随机值构成的向量，此系数为猎物提供了随机权重，以便増加（｜Ｃ｜＞１）或减少（｜Ｃ｜＜１）。这有助于 GWO 在优化过程中展示出随机搜索行为，以避免算法陷入局部最优。值得注意的是，Ｃ并不是线性下降的，Ｃ在迭代过程中是随机值，该系数有利于算法跳出局部，特别是算法在迭代的后期显得尤为重要。

三、部分源代码

 
% GWO
% PSO
% IGWO
% CMGWO
% LRGWO
%% 清空环境变量
clear
clc

%% 基本参数
N = 40;                    % 种群规模
maxgen = 600;         % 最大迭代次数

%% 获取函数名
Function_name = 'F2';   % 从F1到F23的测试函数的名称（本文中的表1、2、3）
[lb, ub, dim, fobj] = Get_Functions_details(Function_name);

%% 初始化种群位置
X = initialization(N, dim, ub, lb);
for i = 1:N
    fitness(i) = fobj(X(i, :));
end

%% 传入函数变量
[bestvalue_GWO, gbest_GWO, Curve_GWO] = GWO(N, maxgen, X, fitness, lb, ub, dim, fobj);
[bestvalue_PSO, gbest_PSO, Curve_PSO] = PSO(N, maxgen, X, fitness, lb, ub, dim, fobj);
[bestvalue_IGWO, gbest_IGWO, Curve_IGWO] = IGWO(N, maxgen, X, fitness, lb, ub, dim, fobj);
[bestvalue_CMGWO, gbest_CMGWO, Curve_CMGWO] = CMGWO(N, maxgen, X, fitness, lb, ub, dim, fobj);
[bestvalue_LRGWO, gbest_LRGWO, Curve_LRGWO] = LRGWO(N, maxgen, X, fitness, lb, ub, dim, fobj);

%% 绘图比较
figure;
t = 1:maxgen;
semilogy(t, Curve_GWO, 'ro-', t, Curve_PSO, 'g*-', t, Curve_IGWO, 'cx-',...
    t, Curve_CMGWO, 'kd-', t, Curve_LRGWO, 'bp-', 'linewidth', 2, 'linewidth', 1.5, 'MarkerSize',7);
legend('GWO', 'PSO', 'IGWO', 'CMGWO', 'LRGWO');
% title('F8');
xlabel( '迭代次数');
ylabel( '目标函数值');
img =gcf;  %获取当前画图的句柄
print(img, '-dpng', '-r600', './运行结果1.png')         %即可得到对应格式和期望dpi的图像
function [Alpha_score, gbest, zz] = GWO(N, maxgen, X, fitness, lb, ub, dim, fobj)
%% 排序
[bestfitness, bestindex] = sort(fitness);
gbest = X(bestindex(1), :);      % 群体最优极值
fitnessgbest = bestfitness(1);     % 种群最优适应度值
% 计算alpha, beta和delta_pos
Alpha_pos = gbest;
Alpha_score = fitnessgbest; 
Beta_pos = X(bestindex(2), :);
Beta_score = bestfitness(2); 
Delta_pos = X(bestindex(3), :);
Delta_score = bestfitness(3); 
%% 初始结果显示
disp(['初始位置：' , num2str(gbest)]);
disp(['初始函数值：', num2str(fitnessgbest)]);

%% 迭代
for gen = 1:maxgen
    a=2-gen*(2/maxgen);     % a从2线性减小到0    
    for i = 1:N
        S(i, :) = X(i, :);
        for j = 1:dim
            r1 = rand();             % r1是[0,1]中的随机数
            r2 = rand();             % r2是[0,1]中的随机数
            A1 = 2*a*r1-a;        % 公式（4）
            C1 = 2*r2;               % 公式（5）
            D_alpha = abs(C1*Alpha_pos(j)-X(i, j));  % 公式（6）-第一部分
            X1 = Alpha_pos(j)-A1*D_alpha;   % 公式 (7)-第一部分
            
            r1 = rand();
            r2 = rand();
            A2 = 2*a*r1-a;         % 公式（4）
            C2 = 2*r2;                % 公式（5）
            D_beta = abs(C2*Beta_pos(j)-X(i, j));   % 公式（6）-第二部分
            X2 = Beta_pos(j)-A2*D_beta;       % 公式 (7)-第二部分
            
            r1 = rand();
            r2 = rand();
            A3 = 2*a*r1-a;        % 公式 (4)
            C3 = 2*r2;               % 公式 (5)
            D_delta = abs(C3*Delta_pos(j)-X(i, j)); % 公式（6）-第三部分
            X3 = Delta_pos(j)-A3*D_delta;      % 公式 (7)-第三部分
            
            X(i, j)=(X1+X2+X3)/3;       % 公式 (8)
            
        end
        % 边界处理
        X(i, X(i, :) > ub) = ub;
        X(i, X(i, :) < lb) = lb;
        % 判断
        fit = fobj(X(i, :));
        if fit > fitness(i)
            X(i, :) = S(i, :);
        else
            fitness(i) = fit;
        end
    end
    [bestfitness, bestindex] = sort(fitness);
    % 计算alpha, beta和delta_pos
    Alpha_pos = X(bestindex(1), :);
    Alpha_score = bestfitness(1);
    Beta_pos = X(bestindex(2), :);
    Beta_score = bestfitness(2);
    Delta_pos = X(bestindex(3), :);
    Delta_score = bestfitness(3);
    %% 每一代群体最优值存入zz数组
    zz(gen) = Alpha_score;
    gbest = Alpha_pos;
    %% 显示每代优化结果
    display(['At iteration ', num2str(gen), ' the best fitness is ', num2str(zz(gen))]);
end

%% 最终结果显示
disp(['最终位置：' , num2str(gbest)]);
disp(['最终函数值：', num2str(zz(end))]);

% %% 绘图
% figure;
% plot(zz, 'r', 'lineWidth', 2);          %  画出迭代图
% xlabel('迭代次数', 'fontsize', 12);
% ylabel('目标函数值', 'fontsize', 12);

三、运行结果

四、matlab版本及参考文献

1 matlab版本
2014a

2 参考文献
[1] 包子阳,余继周,杨杉.智能优化算法及其MATLAB实例（第2版）[M].电子工业出版社，2016.
[2]张岩,吴水根.MATLAB优化算法源代码[M].清华大学出版社，2017.
[3]李阳,李维刚,赵云涛,刘翱.基于莱维飞行和随机游动策略的灰狼算法[J].计算机科学,2020,47(8).