粒子群算法实验报告_第1页
粒子群算法实验报告_第2页
粒子群算法实验报告_第3页
粒子群算法实验报告_第4页
粒子群算法实验报告_第5页
已阅读5页,还剩1页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

Windows

Matlab

PSO

ParticleSwarmOptimization

(Evolu2tionaryAlgorithm-EA

(PSO)

(evolutionarycomputation)1995Eberhart

Kennedy

PSO

(crossover)

PSO

(mutation)

.m

matlab

clearall;

cic;

formatlong;

%——

c1=1.4902;

c2=1.4901;

w=0.7281;

MaxDT=1000;

D=5;

N=40;

eps=10A(-6);

%——

fori=1:N

forj=1:D

x(ij)=randn;%

end

end

%——

% 1

% 2

%

%

%

,(1

v(ij)=randn;%

PiPg fori=1:N

p(i)=function(x(i,:));y(i,:)=x(i,:);

end

Solution=

0.576475699699576

10cos(2八rj+10) ( 1

Rastrigrin

pg=x(1,:); %Pg matlab

fori=2:N

iffunction(x(i,:))<function(pg)pg=x(i,:);

end

%——

fort=1:MaxDT

fori=1:N

v(i,:)=w*v(i,:)+crrand*(y(i,:)-x(i5:))+c2*rand*(pg-x(i,:));x(i5:)=x(i5:)+v(i,:);

iffunction(x(i,:))<p(i)

p(i)=function(x(i,:));

y(i,:)=x(i,:);

end

ifp(i)<function(pg)

pg=y&:);

end

end

Pbest(t)=function(pg);end

% disp(disp(' ')

Solution=pg'

plot(Solution)

disp(' ')

Result=function(pg)disp(

Rastrigins.m Rastrigins

function[out]=Rastrigin(x)

x=-5.12:0.01:5.12;

cos_in=cos(2*pi*x);

out=sum((x.A2-10*cos_in+10),2);

Rastrigrin f

V=0tH /(jt*)=0,EZo1维Rastrigrin 4

(2)

Griewank

Griewank

Griewank.m

Dx=length(in(1,:));

tlenx=length(in(:,1));

ifisempty(D)|D~=Dx|tlen~=tlenx

D=Dx;%dimensionofprob

tlen=tlenx;%howmanyseparatestatesd=repmat([1:D],tlen,1);sqrtd=sqrt(d);

end

dat1=sum([(in-100).a2],2)./4000;

dat2=prod((cos((in-100)./sqrtd)),2);

out=datl-dat2+1;

functionGriewankmatlab

J/=0,1

4,7

4.7Griewankp

(4.10)|

2 a Giwmik

(b)伞局:

Solution=

1.0e+002*

0.089393835024922

1.355075075547163

0.945667645113542

1.188118773920475

0.929927307049068

Result=

2.497904795831135

41 」 I I 」 j I 」

1 16 2 2& 3 35 4 45 5

⑶ 3 Foxhole Foxhole.m

function[out]=Foxhole(in)%x=in(,1);%y=in(,2);term_sum=0;x=in(:,1);y=in(:,1);

a{1}=[..•

32-1601632

32-1601632

32-1601632

32-16

32

-16

16

16

32

32

];

啊..

32-32--32-

32 3

-16-16-16-16-16;

00000;...

1616161616;...

3232323232;...

];

term_sum=O;

forj=1:numel((a{1}))

ax=a{1}(j);

ay=a{2}(j);

term_sum=(x-sx).a6+(y-ay).A6;term_sum=term_sum+1.0/(j+term_sum);endout=.002+term_sum;

•••

Gricwank

Z

tmk

Z

4.7

八二0,

IUIU-J

Solution=

31.999503320926419

6.742047876319

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论