sear_xzxb.m

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

function [XB_new1,XB_new2]=SEAR_XZXB(FITDL,XZ_new1L,XZ_new2L,DL)
%求解新的个体
XB_new1=0;XB_new2=0;
DL;
for i=1:DL;
    if i==1;
        if XZ_new1L<=FITDL(i);
            XB_new1=1;
            break;
        end;
    else
        if (XZ_new1L>FITDL(i-1))&&(XZ_new1L<=FITDL(i));
            XB_new1=i;
            break;
        end
    end;
end;
for i=1:DL;
    if i==1;
        if XZ_new2L<=FITDL(i);
            XB_new2=1;
            break;
        end;
    else
        if XZ_new2L>FITDL(i-1)&&XZ_new2L<=FITDL(i);
            XB_new2=i;
            break;
        end
    end;
end;