【優(yōu)化求解】基于折射反向?qū)W習機制與自適應(yīng)控制因子改進樽海鞘群算法求解單目標優(yōu)化問題matlab代碼(RCSSA)


1?簡介

2 部分代碼

function [sFeat,Sf,Nf,curve] = jSSA2(feat,label,N,max_Iter,HO)

lb? ? = 0;

ub? ? = 1;

thres = 0.5;

fun = @jFitnessFunction;

dim = size(feat,2);?

X? ?= zeros(N,dim);?

for i = 1:N

for d = 1:dim

? ? X(i,d) = lb + (ub - lb) * rand();

? end

end

% Pre

fit? ?= zeros(1,N);

fitF? = inf;

curve = inf;?

t = 1;??

%---Iteration start----------------------------------------------------

while t <= max_Iter

? for i = 1:N

? ? fit(i) = fun(feat,label,(X(i,:) > thres),HO);

? ? if fit(i) < fitF

? ? ? Xf? ?= X(i,:);

? ? ? fitF = fit(i);?

? ? end

? end

? % Additional sort in the first iteration to improve the?

? % initial behavior by divide salps into leader and followers

? if t == 1

? ? [fit, idx] = sort(fit,'ascend');

? ? X? ? ? ? ? = X(idx,:);?

? end

c1 = 2 * exp(-(4 * t / max_Iter) ^ 2);

for i = 1:N

? ? if i == 1

? ? ? for d = 1:dim

? ? ? ? c2 = rand();?

? ? ? ? c3 = rand();

? ? ? ? if c3 >= 0.5?

? ? ? ? ? X(i,d) = Xf(d) + c1 * ((ub - lb) * c2 + lb);

? ? ? ? else

? ? ? ? ? X(i,d) = Xf(d) - c1 * ((ub - lb) * c2 + lb);

? ? ? ? end

? ? ? end

? ? else

? ? ? for d = 1:dim

? ? ? ? X(i,d) = (X(i,d) + X(i-1,d)) / 2;

? ? ? end

? ? end

? ? XB = X(i,:);? XB(XB > ub) = ub;? XB(XB < lb) = lb;

? ? X(i,:) = XB;

? end

? curve(t) = fitF;

? fprintf('\nIteration %d Best (SSA)= %f',t,curve(t))

? t = t + 1;

end

Pos? ?= 1:dim;

Sf? ? = Pos((Xf > thres) == 1);

Nf? ? = length(Sf);

sFeat = feat(:,Sf);?

end

3 仿真結(jié)果

?4 參考文獻

[1]范千、陳振健、夏樟華. 一種基于折射反向?qū)W習機制與自適應(yīng)控制因子的改進樽海鞘群算法[J]. 哈爾濱工業(yè)大學學報, 2020, 52(10):9.

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

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

完整代碼獲取關(guān)注微信公眾號天天matlab

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成,瀏覽時請結(jié)合常識與多方信息審慎甄別。
平臺聲明:文章內(nèi)容(如有圖片或視頻亦包括在內(nèi))由作者上傳并發(fā)布,文章內(nèi)容僅代表作者本人觀點,簡書系信息發(fā)布平臺,僅提供信息存儲服務(wù)。

相關(guān)閱讀更多精彩內(nèi)容

友情鏈接更多精彩內(nèi)容