catastrophe.m

量子遗传算法MATLAB源代码

% 灾变操作
% Catastrophe
function [preGenC,communityQ,communityR,flagC]=Catastrophe(n,k,pop,EMinB,preGen,preGenC,catGen,numLayer,bestIndR,communityQ,communityR)
flagC=0;
if preGen>=2
    if EMinB(preGen)==EMinB(preGen-1)
        if(preGenC>=catGen)
            for ii=1:20
                [communityP(:,:,:,:,ii),communityR(:,:,ii)]=InitiaInd(n,k,numLayer,bestIndR);      % 新单个个体数据代替原来个体数据   
            end
            flagC=1;                      % 灾变位置跟踪
            preGenC=0;
        else
            flagC=0;
            preGenC=preGenC+1;
        end
    else
        preGenC=0;
    end
end