cross1.m

在matlab环境下

function pop_cross=cross(popc,pc,bound,cross_size);
[pop_size,chrom_size]=size(popc);
r=rand(1,pop_size);
a=0.34;k=0; p=1;
for i=1:1:pop_size
	if r(i)<pc
		k=k+1;
		b(k)=i;
		if k==2
         popc(b(1),:)=a*popc(b(2),:)+(1-a)*popc(b(1),:);
         popc(b(2),:)=a*popc(b(1),:)+(1-a)*popc(b(2),:);
         k=0;
      end;
      if p<=cross_size
         pop_cross(p,:)=popc(i,:);
         p=p+1;
      end
 	end;
end;