基于多层编码遗传算法的车间调度算法

ndР%第一层代码表示工序РChrom(j,i)= val;РWPNumberTemp(val)=WPNumberTemp(val)-1;Р%第2层代码表示机器РTemp=Jm{val,MNumber-WPNumberTemp(val)};РSizeTemp=length(Temp);Р%随机产成工序机器РChrom(j,i+WNumber)= unidrnd(SizeTemp);РendРendР%计算目标函数值Р[PVal ObjV P S]=cal(Chrom,JmNumber,T,Jm); Р%% 循环寻找Рwhile gen<MAXGENР%分配适应度值РFitnV=ranking(ObjV); Р%选择操作РSelCh=select('rws', Chrom, FitnV, GGAP); Р%交叉操作РSelCh=across(SelCh,XOVR,Jm,T); Р%变异操作РSelCh=aberranceJm(SelCh,MUTR,Jm,T); Р%计算目标适应度值Р[PVal ObjVSel P S]=cal(SelCh,JmNumber,T,Jm); Р%重新插入新种群Р[Chrom ObjV] =reins(Chrom, SelCh,1, 1, ObjV, ObjVSel); Р%代计数器增加Рgen=gen+1; Р%保存最优值Рtrace(1, gen)=min(ObjV); Рtrace(2, gen)=mean(ObjV); Р% 记录最佳值Рif gen==1РVal1=PVal;РVal2=P;РMinVal=min(ObjV);%最小时间РSTemp=S;РendР%记录最小的工序Рif MinVal> trace(1,gen)РVal1=PVal;РVal2=P;РMinVal=trace(1,gen);РSTemp=S;РendРend