%變異操作，單點變異，變異概率為0.1

% function pop=mutation(pop)

for i=1:40
    if rand<(0.099*G+0.1)./200 %變異概率自適應線性調整，由0.001上升至0.1
        M_pos=round(10*rand);
        if M_pos~=0 %若變異位為0則無意義
            pop(i,M_pos)=1-pop(i,M_pos);
        end
    end
end

clear M_pos;
clear i;