gusucode.com > GAVPai_Book_MathworksCntrlFileEx_May2019 > GAVPai_Book_MathworksCntrlFileEx_May2019/DE_selection_penalty_13030.m

    function [next_gen_pool, next_gen_pool_fit, psifun ] = DE_selection_penalty_13030(feas_parent,   feas_parent_fitness,psip, offsprng,offsprng_fitness, psio,  popln_size) 

for i=1:popln_size
    if (feas_parent_fitness(i) >= offsprng_fitness(i))
         next_gen_pool(i,:)= feas_parent(i,:);
         psifun(i)= psip(i);
         next_gen_pool_fit(i) = feas_parent_fitness(i);
    else next_gen_pool(i,:)= offsprng (i,:);
         psifun(i)=psio(i);
         next_gen_pool_fit(i) = offsprng_fitness(i);
    end
end