改进的PSO的matlab源程序

改进的PSO的matlab源程序改进的PSO的matlab源程序改进的PSO的matlab源程序改进的PSO的matlab源程序

%适值计算
% 测试函数为f（xy）=100（x^2-y）^2+（1-x）^2 -2.048
%计算适应值并赋值
for i=1:popsize
    pop（i8）=100*（pop（i1）^2-pop（i2））^2+（1-pop（i1））^2;
    if pop（i7）>pop（i8）    %若当前适应值优于个体最优值，则进行个体最优信息的更新
        pop（i7）=pop（i8）;          %适值更新
        pop（i5:6）=pop（i1:2）;      %位置坐标更新
    end
end
%种群数组第1列为x轴坐标，第2列为y轴坐标，第3列为x轴速度分量，第4列为y轴速度分量
%第5列为个体最优位置的x轴坐标，第6列为个体最优位置的y轴坐标
%第7列为个体最优适值，第8列为当前个体适应值

%计算完适应值后寻找当前全局最优位置并记录其坐标
if best_fitness>min（pop（:7））
    best_fitness=min（pop（:7））;     %全局最优值
    gbest_x=pop（find（pop（:7）==min（pop（:7）））1）;    %全局最优粒子的位置   
    gbest_y=pop（find（pop（:7）==min（pop（:7）））2）;
end



best_in_history（exetime）=best_fitness;  %记录当前全局最优

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     目录          0  2010-06-17 23:02  重要参考pos

     文件        607  2007-01-09 19:55  重要参考pos\adapting.asv

     文件        877  2008-04-15 10:05  重要参考pos\adapting.m

     文件         95  2008-04-14 22:17  重要参考pos\errorcompute.asv

     文件         27  2007-01-10 08:26  重要参考pos\errorcompute.m

     文件         33  2008-04-15 10:48  重要参考pos\evolutionary@sina.com 密码genetic.txt

     文件        970  2007-01-09 21:33  重要参考pos\initial.asv

     文件       1162  2007-01-11 00:44  重要参考pos\initial.m

     文件       1059  2008-04-15 09:38  重要参考pos\main.asv

     文件       1050  2008-04-15 09:45  重要参考pos\main.m

     文件        269  2007-01-09 20:58  重要参考pos\outputdata.asv

     文件        395  2008-04-15 10:58  重要参考pos\outputdata.m

     文件        695  2007-01-11 00:42  重要参考pos\updatepop.m

----------- ---------  ---------- -----  ----

                 7239                    13