changes.m

来自「遗传算法MATLB图像分割程序及例子」· M 代码 · 共 22 行

function [pops]=changes(cpop,bounds,len,p) 
%基因突变函数 
%function [pops]=changes(pop,bounds,len,p) 
%pop        种群数目 
%bounds     边界约束 
%len        每个变量的编码长度 
%           如len为[4 3 3];表示有三个变量，第一个变量的二进制编码长度为4,依次类推 
%p          突变概率 
%pops       返回突变后的基因 
%p1         基因突变数目 
%           作者：机自01-2班曾新海 
%           [e-mail] 
if isempty(p) 
    p=0.01; 
end 
[n,m]=size(cpop); 
pop=cpop; 
p1=round(sum(len)*n*p); 
k=0;q=[];v=[]; 
while(k