crossoverpar.asv

来自「自适应小生境递阶遗传算法求解函数优化问题 想对其他函数求解就修改functio」· ASV 代码 · 共 25 行

function pop1=crossoverpar(pop,popsize,pc,1)
%
%
%
%
%
%
%

pop1=pop;
for i=1:popsize
    index(i)=i;
end
%
for i=1:popsize
    point=round(rand*(popsize-i));
    temp=index(i);
    index(i)=index(point+i);
    index(point+i)=temp;
end
%
for i=1:2:(popsize-1)
    p=rand;
    if p<pc
        point=round(rand*(1