1 簡介

針對緞藍園丁鳥優(yōu)化算法(SBO)尋優(yōu)精度低和收斂速度慢的問題,提出了基于自適應(yīng)權(quán)重的緞藍園丁鳥優(yōu)化算法(WSBO).首先通過自適應(yīng)權(quán)重的方法改進了緞藍園丁鳥優(yōu)化算法的局部搜索能力,提高了收斂精度.另外通過改進原算法中高斯分布函數(shù)形式對緞藍園丁鳥的求偶亭位置進行變異,提高了算法的全局搜索能力,避免了陷入局部最優(yōu).通過8個標(biāo)準(zhǔn)測試函數(shù)對改進算法與原SBO算法,ABC算法和FA算法進行測試比較,實驗結(jié)果表明,改進算法是可行有效的,相比于基本SBO算法,其收斂速度,精度和算法穩(wěn)定性都有很大程度的提高.

2 部分代碼

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% ? Satin Bowerbird Optimizer(SBO)%%clc;clear;close all;tic%% Problem DefinitionFunction_name='F1';[lowerbound,upperbound,numbervar,costfcn]=cost_functions(Function_name);% VarSize=[1 numbervar]; ?%% SBO Parameters[MaxIt,nPop,alpha,pMutation,sigma]=SBO_parameters(lowerbound,upperbound);%% Initialization[pop,elite,BestCost]=Initialization(nPop,lowerbound,upperbound,numbervar,MaxIt,costfcn);%% SBO Main Loopfor it=1:MaxIt ? ?newpop=pop; ? ?%Calculating the Fitness of each bower ? ?F=zeros(nPop,1); ? ?for i=1:nPop ? ? ? ?if pop(i).Cost>=0 ? ? ? ? ? ?F(i)=1/(1+pop(i).Cost); ? ? ? ?else ? ? ? ? ? ?F(i)=1+abs(pop(i).Cost); ? ? ? ?end ? ?end ? ?%Calculating the probability of each bower ? ?P=F/sum(F); ? ?%changes at any bower ? ?for i=1:nPop ? ? ? ?for k=1:numbervar ? ? ? ? ? ? ? ?% Select target bower ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?j=RouletteWheelSelection(P); ? ? ? ? ? ? ? ?% Calculating Step Size ? ? ? ? ? ? ? ?lambda=alpha/(1+P(j)); ? ? ? ? ? ? ? ?newpop(i).Position(k)=pop(i).Position(k) ... ? ? ? ? ? ? ? ? ? ?+lambda*(((pop(j).Position(k)+elite(k))/2)-pop(i).Position(k)); ? ? ? ? ? ? ? ?% Mutation ? ? ? ? ? ?if rand<=pMutation ? ? ? ? ? ? ? ?newpop(i).Position(k)=newpop(i).Position(k)+(sigma*randn); ? ? ? ? ? ?end ? ? ? ?end ? ? ? ? ?% Evaluation ? ? ? ?newpop(i).Cost=costfcn(newpop(i).Position); ? ?end ? ? pop=[pop ? ? ? ? newpop ? ? ? ? ]; %#ok ? ?% Sort Population ? ?[~, SortOrder]=sort([pop.Cost]); ? ?pop=pop(SortOrder); ? ?pop=pop(1:nPop); ? ?% Update Best Solution Ever Found ? ?BestSol=pop(1); ? ?elite=BestSol.Position; ? ?% Store Best Cost Ever Found ? ?BestCost(it)=BestSol.Cost; ? ?% Show Iteration Information ? ?disp(['SBO:: Iteration-> ' num2str(it) '<----->Best Cost = ' num2str(BestCost(it))]); endtoc%% Resultsdisp(['BestSol=' num2str(elite)]);disp(['BestCost=' num2str(BestSol.Cost)]);figure;semilogy(BestCost,'LineWidth',2);xlabel('Iteration');ylabel('Best Cost');img =gcf; ?%獲取當(dāng)前畫圖的句柄print(img, '-dpng', '-r600', './img.png') ? ? ? ? %即可得到對應(yīng)格式和期望dpi的圖像

3 仿真結(jié)果

4 參考文獻

[1]魯曉藝, 劉升, 韓斐斐,等. 基于自適應(yīng)權(quán)重的緞藍園丁鳥優(yōu)化算法[J]. 智能計算機與應(yīng)用, 2018, 8(6):7.

博主簡介：擅長智能優(yōu)化算法、神經(jīng)網(wǎng)絡(luò)預(yù)測、信號處理、元胞自動機、圖像處理、路徑規(guī)劃、無人機等多種領(lǐng)域的Matlab仿真，相關(guān)matlab代碼問題可私信交流。

部分理論引用網(wǎng)絡(luò)文獻，若有侵權(quán)聯(lián)系博主刪除。