roulette.asv

用matlab编写的采用遗传算法进行图像分割的一个程序

function [newpop]=roulette(oldpop,pz,stringlength)
totalfit=0;
pz=size(oldpop,1);
for i=1:pz
    totalfit=totalfit+oldpop(i,stringlength+2);
end
prob=oldpop(:,stringlength+2)/totalfit;
prob=cumsum(prob);
rns=sort(rand(pz,1)); %按元素的从小到大排成一列
fitin=1;newin=1;
while (newin<=pz)
    if rns(newin)<prob(fitin)
        newpop(newin,:)=oldpop(fitin,:);
        newin=newin+1;
    else
        fitin=fitin+1;
    end
end