addtotm.m

来自「多目标遗传算法,遗传算法,遗传算法,遗传算法,遗传算法」· M 代码 · 共 28 行

function AddToTm
global Chrom Tmatrix nfun
for i=1:length(Chrom)
    if Chrom(i).rank==1
        for r=1:nfun
            Chrom(i).box2(r)=ceil(Chrom(i).obj(r)/0.05);
            if  Chrom(i).box2(r)>21
                Chrom(i).box2(r)=21;
            elseif  Chrom(i).box2(r)<=0
                Chrom(i).box2(r)=1;
            end
        end
        Chrom(i).distance2=0;
        for j=1:nfun
            Chrom(i).distance2=Chrom(i).distance2+Chrom(i).obj(r)^2;
        end
        Chrom(i).distance2=(Chrom(i).distance2)^(1/2);
        if length(Tmatrix{Chrom(i).box2(1),Chrom(i).box2(2),Chrom(i).box2(3)})==0
            Tmatrix{Chrom(i).box2(1),Chrom(i).box2(2),Chrom(i).box2(3)}=Chrom(i);
        else
            if Tmatrix{Chrom(i).box2(1),Chrom(i).box2(2),Chrom(i).box2(3)}.distance2>Chrom(i).distance2
                Tmatrix{Chrom(i).box2(1),Chrom(i).box2(2),Chrom(i).box2(3)}=Chrom(i);
            end
        end
    end
end