- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
利用遗传算法求函数的极大值
利用遗传算法求函数的极大值
该函数有两个局部极大值点,分别是f(2.048,-2.048)=3897.7342和f(2.048,-2.048)=3905.9262,其中,后者为全局最大点。可以分别用二进制编码和十进制编码遗传算法求函数极大值
遗传算法二进制编码求函数极大值程序
%Generic Algorithm for function f(x1,x2) optimum
clear all;
close all;
%Parameters参数
Size=80; %群体大小
G=100; %终止进化代数
CodeL=10; %代码长度
umax=2.048;
umin=-2.048;
E=round(rand(Size,2*CodeL)); %Initial Code 最初代码
%Main Program主程序
for k=1:1:G
time(k)=k;
for s=1:1:Size
m=E(s,:);
y1=0;y2=0; %X对应的十进制代码
%Uncoding
m1=m(1:1:CodeL);
for i=1:1:CodeL
y1=y1+m1(i)*2^(i-1); %将y1转换为十进制数
end
x1=(umax-umin)*y1/1023+umin;
m2=m(CodeL+1:1:2*CodeL);
for i=1:1:CodeL
y2=y2+m2(i)*2^(i-1); %将y2转换为十进制数
end
x2=(umax-umin)*y2/1023+umin; %求x对应的十进制数
F(s)=100*(x1^2-x2)^2+(1-x1)^2; %个体适应度函数
end
Ji=1./F; %个体适应度函数的倒数
%****** Step 1 : Evaluate BestJ ******
BestJ(k)=min(Ji);
fi=F; %Fitness Function 适应函数
[Oderfi,Indexfi]=sort(fi); %Arranging fi small to bigger
Bestfi=Oderfi(Size); %Let Bestfi=max(fi)
BestS=E(Indexfi(Size),:); %Let BestS=E(m), m is the Indexfi belong to max(fi) %最佳样本
bfi(k)=Bestfi;
%****** Step 2 : Select and Reproduct Operation******
fi_sum=sum(fi);
fi_Size=(Oderfi/fi_sum)*Size;
fi_S=floor(fi_Size); %Selecting Bigger fi value
kk=1;
for i=1:1:Size
for j=1:1:fi_S(i) %Select and Reproduce
TempE(kk,:)=E(Indexfi(i),:);
kk=kk+1; %kk is used to reproduce
end
end
%************ Step 3 : Crossover Operation ************
pc=0.60; %交叉概率
n=ceil(20*rand); %种群大小
fo
文档评论(0)