遗传算法实验六.ppt

精选课件 while genMAXGEN FitnV=ranking(ObjV); %分配适应度值 SelCh=select(sus,Chrom,FitnV,GGAP); SelCh=recombin(xovsp,SelCh,0.7); SelCh=mut(SelCh); x=bs2rv(SelCh,FieldD); ObjVSel=Shubert(x(:,1),x(:,2)); [Chrom ObjV]=reins(Chrom,SelCh,1,1,… ObjV,ObjVSel); gen=gen+1; [Y, I]=min(ObjV); %输出每一次的最优解及其对应的自变量值 Y,bs2rv(Chrom(I,:),FieldD) %遗传算法性能跟踪 trace(gen,1)=min(ObjV); trace(gen,2)=sum(ObjV)/length(ObjV); %迭代数为50时画出目标函数值分布图 if(gen==50) figure(2); plot(ObjV);hold on;