sov_jyxb.m

来自「这个一个遗传算法的实例」· M 代码 · 共 21 行

function JYXB_new=SOV_JYXB(FITDL,DL,PsL)
%求解精英下标值
for i=1:DL;
    if i==1;
        FITDL_L(i)=FITDL(i);
    else
        FITDL_L(i)=FITDL(i)-FITDL(i-1);
    end;
end;
for i=1:DL*PsL;
    temp=FITDL_L(1);
    JYXB_new(i)=1;
    for ii=2:DL;
        if temp<=FITDL_L(ii);
            temp=FITDL_L(ii);
            JYXB_new(i)=ii;
        end;
    end;
    FITDL_L(JYXB_new(i))=0;
end;