上传粒子群算法程序

原随风

%标准粒群优化算法程序
4 U4 [+ o4 q+ q5 ~! p" m. G  e, u% 2007.1.9 By jxy
%测试函数：f(x,y)=100(x^2-y)^2+(1-x)^2, -2.048<x,y<2.048
( j/ A1 D5 E. U/ A. g& J%求解函数最小值
6 Q" c! y! @4 w" _- Sglobal popsize; %种群规模
%global popnum; %种群数量
global pop; %种群
%global c0; %速度惯性系数,为0—1的随机数
( f/ X4 r7 A5 e9 e4 o+ Fglobal c1; %个体最优导向系数
global c2; %全局最优导向系数
% Z1 X( T4 n* ~' c$ o) N! xglobal gbest_x; %全局最优解x轴坐标
global gbest_y; %全局最优解y轴坐标
global best_fitness; %最优解
7 t$ N& ^5 b* F# l5 f3 {/ Pglobal best_in_history; %最优解变化轨迹
; w! U% K2 G! n: J/ Q3 J" h2 J0 [) iglobal x_min; %x的下限
2 }: C: ^: P7 Iglobal x_max; %x的上限
global y_min; %y的下限
; h. ^1 B) U* [* t* E) E; rglobal y_max; %y的上限
global gen; %迭代次数
: n5 R& p/ g" iglobal exetime; %当前迭代次数
" U& z6 ]6 A. @: g4 i% s: nglobal max_velocity; %最大速度
0 P6 E% ]! U9 y6 T6 r1 yinitial; %初始化
$ q3 n8 i& y# J2 a1 b4 Tfor exetime=1:gen
outputdata; %实时输出结果
2 q+ N. f6 z, G% T+ fadapting; %计算适应值
errorcompute(); %计算当前种群适值标准差
5 x1 T: R1 \5 w, A3 \/ y% ]4 Yupdatepop; %更新粒子位置
" Y3 H: s/ h" q$ h2 `  Vpause(0.01);
end
3 `  e) }' Z& m" B8 ?4 z" Lclear i;
clear exetime;
$ F' t/ b/ Y/ z- ?4 R9 hclear x_max;
/ B$ z6 C' ^* k1 h. }+ |clear x_min;
clear y_min;
) H9 u# Q$ J/ k1 R2 t7 |9 `clear y_max;

- N: a' Z7 G; a+ l  u% Y
8 y3 k/ Y1 [1 o# Q8 J
请问下这是用什么程序编写的呢？

姗姗来迟156

可以相互学习，不错，谢谢楼主

继续心灵之旅

不知道哦，可以运行不！谢谢

jdbskhq

强烈支持楼主ing……

seanchio

这是用matlab的M文件程序编写的。新建文件夹是什么

原随风

回复 2# seanchio
9 x+ }. ]( G9 ^+ i& Z+ A' E

    里面是源程序的，上传上来和大家讨论下呢

doyle

很实用，这个优化算法现在广泛应用在各个领域。目前我也在搜集这方面的资料呢，谢谢你的分享！

fat.taotao

俺是不是要执行版规啊 :)

原随风

回复 5# fat.taotao
! i$ ~: M2 q1 Q9 m, ]8 k" s9 Z5 v
3 F1 K% h+ a% C% B$ Q1 Q  C3 ?/ e$ b
- @& D: ?: n- ~9 z, x    ?

fat.taotao

上传资料，请说明该资料有何可取之处

zhaodawei

不错的东东

原随风

回复 7# fat.taotao

8 w7 ]' X7 z- u) E
5 A& r, n6 w# Z" q+ f" W    晕

dadaly

还不错，希望对我会有帮助。