资源描述：
《人工鱼群算法仿真程序-matlab.docx》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、ticfigure(1);holdonezplot('x*sin(10*pi*x)+2',[-1,2]);%%参数设置fishnum=50;%生成50只人工鱼MAXGEN=50;%最多迭代次数try_number=100;%最多试探次数visual=1;%感知距离delta=0.618;%拥挤度因子step=0.1;%步长%%初始化鱼群lb_ub=[-1,2,1];X=AF_init(fishnum,lb_ub);LBUB=[];fori=1:size(lb_ub,1)LBUB=[LBUB;repmat(lb_ub(i,1:2),lb_ub(i,3),1
2、)];endgen=1;BestY=-1*ones(1,MAXGEN);%每步中最优的函数值BestX=-1*ones(1,MAXGEN);%每步中最优的自变量besty=-100;%最优函数值Y=AF_foodconsistence(X);whilegen<=MAXGENfprintf(1,'%d',gen)fori=1:fishnum%%聚群行为[Xi1,Yi1]=AF_swarm(X,i,visual,step,delta,try_number,LBUB,Y);%%追尾行为[Xi2,Yi2]=AF_follow(X,i,visual,step,
3、delta,try_number,LBUB,Y);ifYi1>Yi2X(:,i)=Xi1;Y(1,i)=Yi1;elseX(:,i)=Xi2;Y(1,i)=Yi2;endend[Ymax,index]=max(Y);figure(1);plot(X(1,index),Ymax,'.','color',[gen/MAXGEN,0,0])ifYmax>bestybesty=Ymax;bestx=X(:,index);BestY(gen)=Ymax;[BestX(:,gen)]=X(:,index);elseBestY(gen)=BestY(gen-1);[B
4、estX(:,gen)]=BestX(:,gen-1);endgen=gen+1;endplot(bestx(1),besty,'ro','MarkerSize',100)xlabel('x')ylabel('y')title('鱼群算法迭代过程中最优坐标移动')%%优化过程图figureplot(1:MAXGEN,BestY)xlabel('迭代次数')ylabel('优化值')title('鱼群算法迭代过程')disp(['最优解X：',num2str(bestx,'%1.5f')])disp(['最优解Y：',num2str(besty,'%1.5
5、f')])toc
