myga.m

遗传算法MATLB图像分割程序及例子

function [f,x]=myga(num,bounds,N,CP,P) 
%[f,x]=ga(num,bounds,fun,N,CP,P)  
%[f,x]=myga([],bounds,[],[],[]) 
%该遗传算法适用于： 
%           目标函数为求最大值，且解非负整数解 
%bounds     边界约束 
%Myfun      为目标函数 
%num        初始种群数 
%N          最大迭代次数 
%CP         交叉概率 
%P          突变概率 
%f          目标最优解 
%x          最优解向量 
%           作者：机自01-2班曾新海 
%           [e-mail] 
m=nargin; 
if m<5 
disp('-_-  错误!') 
disp('>> 输入变量太少') 
disp('>>  按回车键查看帮助') 
    pause 
    help ga 
    f='-_- '; 
    x='没有规矩不成方圆'; 
    break; 
end 
if isempty(CP) 
    CP=0.25; 
end 
if isempty(P) 
    P=0.01; 
end 
if isempty(N) 
    N=1000; 
end 
if any(bounds(:,1))<0 
    disp('-_-  错误!') 
disp('>>  按回车键查看帮助') 
    pause 
    help ga 
    f='-_- '; 
    x='没有规矩不成方圆'; 
    break; 
end 
if isempty(num) 
    num=100; 
end 
pop=INTinti(num,bounds); 
fmax=pop(:,end); 
endpop=pop; 
n=size(endpop,2); 
count=0;x=[];f=zeros(1,num); 
while(countbounds(jj,2) 
        f(i)=-inf; 
      end 
end 
            if fmax(i)
            end
            end