毕业设计matlab程序,完整的遗传算法函数Matlab程序【精品毕业设计】(完整版)

完整的遗传算法函数Matlab程序

function [x,endPop,bPop,traceInfo] = ga(bounds,eevalFN,eevalOps,startPop,opts,... termFN,termOps,selectFN,selectOps,xOverFNs,xOverOps,mutFNs,mutOps)

n=nargin;

if n<2 | n==6 | n==10 | n==12

disp('Insufficient arguements')

end

if n<3 %Default eevalation opts.

eevalOps=[];

end

if n<5

opts = [1e-6 1 0];

end

if isempty(opts)

opts = [1e-6 1 0];

end

if any(eevalFN<48) %Not using a .m file

if opts(2)==1 %Float ga

e1str=['x=c1; c1(xZomeLength)=', eevalFN ';'];

e2str=['x=c2; c2(xZomeLength)=', eevalFN ';'];

else %Binary ga

e1str=['x=b2f(endPop(j,:),bounds,bits); endPop(j,xZomeLength)=',...

eevalFN ';'];

end

else %Are using a .m file

if opts(2)==1 %Float ga

e1str=['[c1 c1(xZomeLength)]=' eevalFN '(c1,[gen eevalOps]);'];

e2str=['[c2 c2(xZomeLength)]=' eevalFN '(c2,[gen eevalOps]);'];

else %Binary ga

e1str=['x=b2f(endPop(j,:),bounds,bits);[x v]=' eevalFN ...

'(x,[gen eevalOps]); endPop(j,:)=[f2b(x,bounds,bits) v];'];

end

end

if n<6 %Default termination information

termOps=[100];