% The select oprator function
% function new_pop=select(pop,ada)

ada_sum=0;
ada_temp=0;
r=0;
i=0;j=0;
for i=1:40
    ada_sum=ada_sum+adapt(i);
end

for i=1:39      %選擇39次，最后一個個體留給歷代最優解
    r=rand*ada_sum;  %隨機產生一個數
    ada_temp=0;      %初始化累加值為0
    j=0;
    while(ada_temp<r)
        j=j+1;
        ada_temp=ada_temp+adapt(j);        
    end
    %退出循環時的j值即為被選擇的個體序號
%     if j>40
%         j=40;
%     end
        
    for k=1:10
        new_pop(i,k)=pop(j,k);
    end

end

% 最優解復制
for i=1:10
    new_pop(40,i)=best_individual(i);
end

%將選擇產生的新群體復制給pop種群
for i=1:40
    for j=1:10
        pop(i,j)=new_pop(i,j);
    end
end

clear i;
clear j;
clear k;
clear r;
clear ada_temp;