rdiscretexover.sci

来自「站长您好！GATS是一种遗传算法工具箱」· SCI 代码 · 共 24 行

function [c1,c2] = RDiscreteXover(p1,p2,bounds,Ops)
// function [c1,c2] = arithXover(p1,p2,bounds,Ops)
// p1      - the first parent ( [solution string function value] )
// p2      - the second parent ( [solution string function value] )
// bounds  - the bounds matrix for the solution space
// Ops     - Options matrix for arith crossover [gen #ArithXovers]


// Pick a random mix amount
varnum = size(p1,2)-1;

// Create the children
if (varnum==1)
    c1 = p1;
    c2 = p2; 
else
    c1 = p1;
    c2 = p2; 
    t = round(rand(1,varnum));
    c1(t)=p2(t);
    c2(t)=p1(t);
end