【Matlab】智能优化算法_樽海鞘群算法SSA

news/2024/11/25 20:44:51/

【Matlab】智能优化算法_樽海鞘群算法SSA

  • 1.背景介绍
  • 2.数学模型
    • 2.1 提出的移动樽海鞘链的数学模型
    • 2.2 Swarm仿真
    • 2.3 单目标Salp Swarm算法(SSA)
  • 3.算法流程图
  • 4.文件结构
  • 5.伪代码
  • 6.详细代码及注释
    • 6.1 func_plot.m
    • 6.2 Get_Functions_details.m
    • 6.3 initialization.m
    • 6.4 main.m
    • 6.5 SSA.m
  • 7.运行结果
  • 8.参考文献

在这里插入图片描述

1.背景介绍

樽海鞘,身体呈透明的桶状。它们的组织与水母非常相似。它们的运动也非常类似于水母,在水母中,水被泵送通过身体作为推进向前运动。输卵管的形状如图1(a)所示。

在这里插入图片描述

关于这种生物的生物学研究处于早期阶段,主要是因为它们的生活环境极难进入,而且很难将它们保存在实验室环境中。樽海鞘最有趣的行为之一,也是论文中感兴趣的,是它们的群集行为。在深海中,沙鱼经常形成一个称为沙鱼链的群体。该链条如图1(b)所示。这种行为的主要原因尚不清楚,但一些研究人员认为,这样做是为了通过快速协调的变化和觅食来实现更好的运动。

2.数学模型

2.1 提出的移动樽海鞘链的数学模型

为了对樽海鞘(salp)链进行数学建模,首先将种群分为两组:领导者和追随者。领导者是链前面的salp,而salp的其余部分则被视为追随者。正如这些salps的名字所暗示的那样,领导者引导群体,追随者相互跟随(以及领导者直接或间接)。

类似于其他基于群的技术,salps的位置是在n维搜索空间中定义的,其中n是给定问题的变量数。因此,所有salps的位置都存储在一个称为x的二维矩阵中。还假设在搜索空间中有一个名为F的食物源作为群体的目标。

为了更新领导者的位置,提出了以下等式:

在这里插入图片描述

其中,x1j表示第一个salp(前导)在第j维中的位置,Fj是食物源在第j维度中的位置、ubj表示第j维的上界、lbj表示第i维的下界,c1、c2和c3是随机数。

等式(3.1)表明,引导器仅更新其相对于食物源的位置。系数c1是SSA中最重要的参数,因为它平衡了勘探和开采,定义如下:

在这里插入图片描述

其中l是当前迭代,l是迭代的最大次数。

参数c2和c3是在[0,1]的区间中均匀生成的随机数。事实上,它们决定了第j维中的下一个位置是朝向正无穷大还是负无穷大,以及步长。

为了更新从动件的位置,使用以下方程(牛顿运动定律):

在这里插入图片描述

当i≥2时,xi j表示第i个跟随器salp在j维的位置,t是时间,v0是初始速度,a=v_final/v_0,其中v=(x−x_0)/t。

因为优化中的时间是迭代,所以迭代之间的差异等于1,并且考虑v0=0,这个方程可以表示如下:

在这里插入图片描述

其中i≥2,xi j表示第i个跟随器salp在j维中的位置。

利用等式(3.1)和(3.4),可以模拟salp链。

2.2 Swarm仿真

为了观察上述数学模型的效果,在本小节中进行了模拟。二十条salps被随机放置在有固定或移动食物来源的搜索空间中。输卵管链的位置和每条输卵管的历史如图2-5所示。请注意,图中的蓝色点表示食物来源的位置,最深的圆圈是最前面的salp。跟随者的萨尔普根据其在萨尔普链中相对于引导者的位置而被涂上灰色。在图2和图4中检查salp链在九次连续迭代中的行为,可以观察到,在第一次迭代后,可以使用有效提出的方程形成和移动群。此外,可以看出,在迭代过程中,领先的salp会改变其在食物来源周围的位置,而跟随的salp则会逐渐跟随它。两个模拟都使用了相同的模型,并且在两个2D中都使用了该模型的优点

图3和图5显示了100次迭代后,在2D和3D空间中固定和移动食物源周围的salp的位置历史。在固定食物源周围搜索的点表明,salp在搜索空间周围有效地移动。点的分布是合理的,表明所提出的模型能够探索和利用固定食物源周围的空间。此外,图3和图5显示,所提出的数学模型要求salp链中的salp追逐移动的食物源。在起点周围搜索的点的分布高于终点。这是由于控制勘探和开发的c1参数。这些发现证明,salp链运动模型能够探索和利用固定和移动食物来源周围的空间。

在这里插入图片描述

在这里插入图片描述

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

2.3 单目标Salp Swarm算法(SSA)

不用说,模拟salp链的数学模型不能直接用于解决优化问题。换句话说,需要稍微调整一下模型,使其适用于优化问题。单目标优化器的最终目标是确定全局最优。在SSA群模型中,跟随salp跟随前导salp。主要的沙拉酱也向食物来源移动。因此,如果食物源被全局最优替代,salp链会自动向其移动。然而,问题是优化问题的全局最优是未知的。在这种情况下,假设到目前为止获得的最佳解决方案是全局最优的,并假设为salp链追逐的食物来源。

SSA算法的伪代码如图6.1所示。该图显示SSA算法通过启动具有随机位置的多个salp来开始逼近全局最优。然后,它计算每个salp的适应度,找到适应度最好的salp,并将最佳salp的位置分配给变量F,作为salp链要追逐的源食物。同时,使用等式(3.2)更新系数c1。对于每个维度,使用等式(3.1)来更新前导salp的位置和使用等式(3.4)来更新跟随salp的地位。如果任何salp超出搜索空间,它将被带回到边界上。除了初始化之外的所有上述步骤都被反复执行,直到满足结束标准为止。

3.算法流程图

在这里插入图片描述

4.文件结构

在这里插入图片描述

func_plot.m						% 绘制的基准函数
Get_Functions_details.m 		% 基准的全部信息和实现
initialization.m 				% 初始化
main.m							% 主函数
SSA.m							% 樽海鞘群优化算法

5.伪代码

在这里插入图片描述

6.详细代码及注释

6.1 func_plot.m

function func_plot(func_name)[lb,ub,dim,fobj]=Get_Functions_details(func_name);switch func_name case 'F1' x=-100:2:100; y=x; %[-100,100]case 'F2' x=-100:2:100; y=x; %[-10,10]case 'F3' x=-100:2:100; y=x; %[-100,100]case 'F4' x=-100:2:100; y=x; %[-100,100]case 'F5' x=-200:2:200; y=x; %[-5,5]case 'F6' x=-100:2:100; y=x; %[-100,100]case 'F7' x=-1:0.03:1;  y=x  %[-1,1]case 'F8' x=-500:10:500;y=x; %[-500,500]case 'F9' x=-5:0.1:5;   y=x; %[-5,5]    case 'F10' x=-20:0.5:20; y=x;%[-500,500]case 'F11' x=-500:10:500; y=x;%[-0.5,0.5]case 'F12' x=-10:0.1:10; y=x;%[-pi,pi]case 'F13' x=-5:0.08:5; y=x;%[-3,1]case 'F14' x=-100:2:100; y=x;%[-100,100]case 'F15' x=-5:0.1:5; y=x;%[-5,5]case 'F16' x=-1:0.01:1; y=x;%[-5,5]case 'F17' x=-5:0.1:5; y=x;%[-5,5]case 'F18' x=-5:0.06:5; y=x;%[-5,5]case 'F19' x=-5:0.1:5; y=x;%[-5,5]case 'F20' x=-5:0.1:5; y=x;%[-5,5]        case 'F21' x=-5:0.1:5; y=x;%[-5,5]case 'F22' x=-5:0.1:5; y=x;%[-5,5]     case 'F23' x=-5:0.1:5; y=x;%[-5,5]  
end    L=length(x);
f=[];for i=1:Lfor j=1:Lif strcmp(func_name,'F15')==0 && strcmp(func_name,'F19')==0 && strcmp(func_name,'F20')==0 && strcmp(func_name,'F21')==0 && strcmp(func_name,'F22')==0 && strcmp(func_name,'F23')==0f(i,j)=fobj([x(i),y(j)]);endif strcmp(func_name,'F15')==1f(i,j)=fobj([x(i),y(j),0,0]);endif strcmp(func_name,'F19')==1f(i,j)=fobj([x(i),y(j),0]);endif strcmp(func_name,'F20')==1f(i,j)=fobj([x(i),y(j),0,0,0,0]);end       if strcmp(func_name,'F21')==1 || strcmp(func_name,'F22')==1 ||strcmp(func_name,'F23')==1f(i,j)=fobj([x(i),y(j),0,0]);end          end
endsurfc(x,y,f,'LineStyle','none');end

6.2 Get_Functions_details.m

function [lb,ub,dim,fobj] = Get_Functions_details(F)switch Fcase 'F1'fobj = @F1;lb=-100;ub=100;dim=30;case 'F2'fobj = @F2;lb=-10;ub=10;dim=10;case 'F3'fobj = @F3;lb=-100;ub=100;dim=10;case 'F4'fobj = @F4;lb=-100;ub=100;dim=10;case 'F5'fobj = @F5;lb=-30;ub=30;dim=10;case 'F6'fobj = @F6;lb=-100;ub=100;dim=10;case 'F7'fobj = @F7;lb=-1.28;ub=1.28;dim=10;case 'F8'fobj = @F8;lb=-500;ub=500;dim=10;case 'F9'fobj = @F9;lb=-5.12;ub=5.12;dim=10;case 'F10'fobj = @F10;lb=-32;ub=32;dim=10;case 'F11'fobj = @F11;lb=-600;ub=600;dim=10;case 'F12'fobj = @F12;lb=-50;ub=50;dim=10;case 'F13'fobj = @F13;lb=-50;ub=50;dim=10;case 'F14'fobj = @F14;lb=-65.536;ub=65.536;dim=2;case 'F15'fobj = @F15;lb=-5;ub=5;dim=4;case 'F16'fobj = @F16;lb=-5;ub=5;dim=2;case 'F17'fobj = @F17;lb=[-5,0];ub=[10,15];dim=2;case 'F18'fobj = @F18;lb=-2;ub=2;dim=2;case 'F19'fobj = @F19;lb=0;ub=1;dim=3;case 'F20'fobj = @F20;lb=0;ub=1;dim=6;     case 'F21'fobj = @F21;lb=0;ub=10;dim=4;    case 'F22'fobj = @F22;lb=0;ub=10;dim=4;    case 'F23'fobj = @F23;lb=0;ub=10;dim=4;            
endend% F1function o = F1(x)
o=sum(x.^2);
end% F2function o = F2(x)
o=sum(abs(x))+prod(abs(x));
end% F3function o = F3(x)
dim=size(x,2);
o=0;
for i=1:dimo=o+sum(x(1:i))^2;
end
end% F4function o = F4(x)
o=max(abs(x));
end% F5function o = F5(x)
dim=size(x,2);
o=sum(100*(x(2:dim)-(x(1:dim-1).^2)).^2+(x(1:dim-1)-1).^2);
end% F6function o = F6(x)
o=sum(abs((x+.5)).^2);
end% F7function o = F7(x)
dim=size(x,2);
o=sum([1:dim].*(x.^4))+rand;
end% F8function o = F8(x)
o=sum(-x.*sin(sqrt(abs(x))));
end% F9function o = F9(x)
dim=size(x,2);
o=sum(x.^2-10*cos(2*pi.*x))+10*dim;
end% F10function o = F10(x)
dim=size(x,2);
o=-20*exp(-.2*sqrt(sum(x.^2)/dim))-exp(sum(cos(2*pi.*x))/dim)+20+exp(1);
end% F11function o = F11(x)
dim=size(x,2);
o=sum(x.^2)/4000-prod(cos(x./sqrt([1:dim])))+1;
end% F12function o = F12(x)
dim=size(x,2);
o=(pi/dim)*(10*((sin(pi*(1+(x(1)+1)/4)))^2)+sum((((x(1:dim-1)+1)./4).^2).*...
(1+10.*((sin(pi.*(1+(x(2:dim)+1)./4)))).^2))+((x(dim)+1)/4)^2)+sum(Ufun(x,10,100,4));
end% F13function o = F13(x)
dim=size(x,2);
o=.1*((sin(3*pi*x(1)))^2+sum((x(1:dim-1)-1).^2.*(1+(sin(3.*pi.*x(2:dim))).^2))+...
((x(dim)-1)^2)*(1+(sin(2*pi*x(dim)))^2))+sum(Ufun(x,5,100,4));
end% F14function o = F14(x)
aS=[-32 -16 0 16 32 -32 -16 0 16 32 -32 -16 0 16 32 -32 -16 0 16 32 -32 -16 0 16 32;,...
-32 -32 -32 -32 -32 -16 -16 -16 -16 -16 0 0 0 0 0 16 16 16 16 16 32 32 32 32 32];for j=1:25bS(j)=sum((x'-aS(:,j)).^6);
end
o=(1/500+sum(1./([1:25]+bS))).^(-1);
end% F15function o = F15(x)
aK=[.1957 .1947 .1735 .16 .0844 .0627 .0456 .0342 .0323 .0235 .0246];
bK=[.25 .5 1 2 4 6 8 10 12 14 16];bK=1./bK;
o=sum((aK-((x(1).*(bK.^2+x(2).*bK))./(bK.^2+x(3).*bK+x(4)))).^2);
end% F16function o = F16(x)
o=4*(x(1)^2)-2.1*(x(1)^4)+(x(1)^6)/3+x(1)*x(2)-4*(x(2)^2)+4*(x(2)^4);
end% F17function o = F17(x)
o=(x(2)-(x(1)^2)*5.1/(4*(pi^2))+5/pi*x(1)-6)^2+10*(1-1/(8*pi))*cos(x(1))+10;
end% F18function o = F18(x)
o=(1+(x(1)+x(2)+1)^2*(19-14*x(1)+3*(x(1)^2)-14*x(2)+6*x(1)*x(2)+3*x(2)^2))*...(30+(2*x(1)-3*x(2))^2*(18-32*x(1)+12*(x(1)^2)+48*x(2)-36*x(1)*x(2)+27*(x(2)^2)));
end% F19function o = F19(x)
aH=[3 10 30;.1 10 35;3 10 30;.1 10 35];cH=[1 1.2 3 3.2];
pH=[.3689 .117 .2673;.4699 .4387 .747;.1091 .8732 .5547;.03815 .5743 .8828];
o=0;
for i=1:4o=o-cH(i)*exp(-(sum(aH(i,:).*((x-pH(i,:)).^2))));
end
end% F20function o = F20(x)
aH=[10 3 17 3.5 1.7 8;.05 10 17 .1 8 14;3 3.5 1.7 10 17 8;17 8 .05 10 .1 14];
cH=[1 1.2 3 3.2];
pH=[.1312 .1696 .5569 .0124 .8283 .5886;.2329 .4135 .8307 .3736 .1004 .9991;...
.2348 .1415 .3522 .2883 .3047 .6650;.4047 .8828 .8732 .5743 .1091 .0381];
o=0;
for i=1:4o=o-cH(i)*exp(-(sum(aH(i,:).*((x-pH(i,:)).^2))));
end
end% F21function o = F21(x)
aSH=[4 4 4 4;1 1 1 1;8 8 8 8;6 6 6 6;3 7 3 7;2 9 2 9;5 5 3 3;8 1 8 1;6 2 6 2;7 3.6 7 3.6];
cSH=[.1 .2 .2 .4 .4 .6 .3 .7 .5 .5];o=0;
for i=1:5o=o-((x-aSH(i,:))*(x-aSH(i,:))'+cSH(i))^(-1);
end
end% F22function o = F22(x)
aSH=[4 4 4 4;1 1 1 1;8 8 8 8;6 6 6 6;3 7 3 7;2 9 2 9;5 5 3 3;8 1 8 1;6 2 6 2;7 3.6 7 3.6];
cSH=[.1 .2 .2 .4 .4 .6 .3 .7 .5 .5];o=0;
for i=1:7o=o-((x-aSH(i,:))*(x-aSH(i,:))'+cSH(i))^(-1);
end
end% F23function o = F23(x)
aSH=[4 4 4 4;1 1 1 1;8 8 8 8;6 6 6 6;3 7 3 7;2 9 2 9;5 5 3 3;8 1 8 1;6 2 6 2;7 3.6 7 3.6];
cSH=[.1 .2 .2 .4 .4 .6 .3 .7 .5 .5];o=0;
for i=1:10o=o-((x-aSH(i,:))*(x-aSH(i,:))'+cSH(i))^(-1);
end
endfunction o=Ufun(x,a,k,m)
o=k.*((x-a).^m).*(x>a)+k.*((-x-a).^m).*(x<(-a));
end

6.3 initialization.m

function Positions=initialization(SearchAgents_no,dim,ub,lb)Boundary_no= size(ub,1); % numnber of boundaries% If the boundaries of all variables are equal and user enter a signle
% number for both ub and lb
if Boundary_no==1Positions=rand(SearchAgents_no,dim).*(ub-lb)+lb;
end% If each variable has a different lb and ub
if Boundary_no>1for i=1:dimub_i=ub(i);lb_i=lb(i);Positions(:,i)=rand(SearchAgents_no,1).*(ub_i-lb_i)+lb_i;end
end

6.4 main.m

clear all 
clcSearchAgents_no=30; % Number of search agentsFunction_name='F1'; % Name of the test function that can be from F1 to F23 ( Max_iteration=1000; % Maximum numbef of iterations% Load details of the selected benchmark function
[lb,ub,dim,fobj]=Get_Functions_details(Function_name);[Best_score,Best_pos,SSA_cg_curve]=SSA(SearchAgents_no,Max_iteration,lb,ub,dim,fobj);figure('Position',[500 500 660 290])
%Draw search space
subplot(1,2,1);
func_plot(Function_name);
title('Parameter space')
xlabel('x_1');
ylabel('x_2');
zlabel([Function_name,'( x_1 , x_2 )'])%Draw objective space
subplot(1,2,2);
semilogy(SSA_cg_curve,'Color','r')
title('Objective space')
xlabel('Iteration');
ylabel('Best score obtained so far');axis tight
grid on
box on
legend('SSA')display(['The best solution obtained by SSA is \m ', num2str(Best_pos)]);
display(['The best optimal value of the objective funciton found by SSA is \n ', num2str(Best_score)]);

6.5 SSA.m

function [FoodFitness,FoodPosition,Convergence_curve]=SSA(N,Max_iter,lb,ub,dim,fobj)if size(ub,1)==1ub=ones(dim,1)*ub;lb=ones(dim,1)*lb;
endConvergence_curve = zeros(1,Max_iter);%Initialize the positions of salps
SalpPositions=initialization(N,dim,ub,lb);FoodPosition=zeros(1,dim);
FoodFitness=inf;%calculate the fitness of initial salpsfor i=1:size(SalpPositions,1)SalpFitness(1,i)=fobj(SalpPositions(i,:));
end[sorted_salps_fitness,sorted_indexes]=sort(SalpFitness);for newindex=1:NSorted_salps(newindex,:)=SalpPositions(sorted_indexes(newindex),:);
endFoodPosition=Sorted_salps(1,:);
FoodFitness=sorted_salps_fitness(1);%Main loop
l=2; % start from the second iteration since the first iteration was dedicated to calculating the fitness of salps
while l<Max_iter+1c1 = 2*exp(-(4*l/Max_iter)^2); % Eq. (3.2) in the paperfor i=1:size(SalpPositions,1)SalpPositions= SalpPositions';if i<=N/2for j=1:1:dimc2=rand();c3=rand();%%%%%%%%%%%%% % Eq. (3.1) in the paper %%%%%%%%%%%%%%if c3<0.5 SalpPositions(j,i)=FoodPosition(j)+c1*((ub(j)-lb(j))*c2+lb(j));elseSalpPositions(j,i)=FoodPosition(j)-c1*((ub(j)-lb(j))*c2+lb(j));end%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%endelseif i>N/2 && i<N+1point1=SalpPositions(:,i-1);point2=SalpPositions(:,i);SalpPositions(:,i)=(point2+point1)/2; % % Eq. (3.4) in the paperendSalpPositions= SalpPositions';endfor i=1:size(SalpPositions,1)Tp=SalpPositions(i,:)>ub';Tm=SalpPositions(i,:)<lb';SalpPositions(i,:)=(SalpPositions(i,:).*(~(Tp+Tm)))+ub'.*Tp+lb'.*Tm;SalpFitness(1,i)=fobj(SalpPositions(i,:));if SalpFitness(1,i)<FoodFitnessFoodPosition=SalpPositions(i,:);FoodFitness=SalpFitness(1,i);endendConvergence_curve(l)=FoodFitness;l = l + 1;
end

7.运行结果

在这里插入图片描述

8.参考文献

[1]Mirjalili S,Gandomi H A,Mirjalili Z S, et al. Salp Swarm Algorithm: A bio-inspired optimizer for engineering design problems[J]. Advances in Engineering Software,2017,114.


http://www.ppmy.cn/news/713281.html

相关文章

【Linux】rpm,deb包管理

一、简介 Linux中系统大致可分为两类&#xff1a; Debian系列&#xff1a;Debian、Ubuntu&#xff1b;Red Hat系列&#xff1a;Red Hat、Centos、Fedora&#xff1b; 这两类系统都使用了Linux内核&#xff0c;最大的区别在于他们的软件包管理方式&#xff1a; 项目DebianRe…

植物大战僵尸2 android 修改,【图片】植物大战僵尸2常用修改教程【gg助手吧】_百度贴吧...

该楼层疑似违规已被系统折叠 隐藏此楼查看此楼 ★★★接下来是重点★★★ 全植物代码&#xff1a;(✘表示无对应植物) 1向日葵 2豌豆射手 3坚果 4高坚果 5菜问 6卷心菜投手 7西瓜投手 8樱桃炸弹 9椰子加农炮 10噬碑藤 11冰冻生菜 12激光豆 13土豆地雷 14双重射手 15火龙草 16地…

五边形创意画_儿童美术创意绘画图片_儿童美术创意绘画作品

观察&#xff0c;通俗一点讲就是去看&#xff0c;当然不是随便一看&#xff0c;要通过“看”来提高辨别事物的能力。在美术教学中观察的重要性不仅仅适应于绘画领域&#xff0c;下面是小编整理的儿童美术创意绘画图片。 儿童美术创意绘画图片 儿童美术创意绘画图片1 儿童美术创…

使用js实现植物大战僵尸的一些基本功能

js原生&#xff0c;仅实现了部分游戏基本功能。植物有向日葵&#xff0c;豌豆射手&#xff0c;坚果&#xff0c;土豆雷。僵尸只有普通僵尸。是在学习前端的过程写的&#xff0c;有小bug存在, js部分注释较全&#xff0c;欢迎大家批评指正。 目录 游戏截图&#xff1a;​编辑 …

AI 实战篇 |基于 AI开放平台实现 【植物识别】 功能,成为行走的百科全书

🎬 博客主页:https://xiaoy.blog.csdn.net 🎥 本文由 呆呆敲代码的小Y 原创,首发于 CSDN🙉 🎄 学习专栏推荐:Unity系统学习专栏 🌲 游戏制作专栏推荐:游戏制作 🌲Unity实战100例专栏推荐:Unity 实战100例 教程 🏅 欢迎点赞 👍 收藏 ⭐留言 📝 如有错误敬…

CSS知识点汇总(第三篇:为网页添加列表)

无序列表 知识点概述&#xff1a;无序列表是网页中最常用的列表&#xff0c;之所以称为"无序列表”&#xff0c;是因为其各个列表项之间为并列关系&#xff0c;没有顺序级别之分。 <ul><li>列表项1</i> <li>列表项2</i> <li>列表项…

2022.3 C++植物大战僵尸项目总结

2022.3.15&#xff1a; 目录 1.对于上一次飞机大战项目的复盘 2.此次项目项目设计 3.实现思路 4.项目架构详述 5.学到的东西 6.未来展望 1.对于上一次项目飞机大战的复盘 上次做完项目之后其实没有仔细去思考&#xff0c;也没有仔细看当时的答辩和总结的视频。等到做这…

看完这篇你一定能掌握Linux(非广告)

原创&#xff1a;小姐姐味道&#xff08;微信公众号ID&#xff1a;xjjdog&#xff09;&#xff0c;欢迎分享&#xff0c;转载请保留出处。 有很多同学微信问我&#xff0c;Linux命令这么多&#xff0c;该怎么从入门到精通&#xff1f;其实&#xff0c;这个事情非常的simple&…