资源简介

通过遗传算法实现的作业车间调度源码,供参考学习和交流。

资源截图

代码片段和文件信息

function ChromNew=aberrance(ChromNINDMUTRWNumber)

% Chrom=[1 2 3 4 6 7 8 9 5; 
%     3 4 5 6 2 1 8 7 9;
%     3 4 5 6 2 1 8 7 9;
%     1 2 3 4 5 6 8 7 9;
%     3 4 2 6 1 8 5 7 9;
%     8 9 5 4 6 3 2 1 7 ;
%     7 4 5 6 2 3 1 8  9;
%     3 4 5 8 2 1 7 9 6;
%     3 4 1 5 6 9 2 8 7 ;
%     9 4 5 3 6 1 2 8 7 ;
%     ];
%  NIND=10;
%  
%  WNumber=9;
%   MUTR=0.2;
 
 %新群
 ChromNew=Chrom;

for i=1:NIND  
    
 %是否变异
 a=rand;
 if MUTR>a;
     
  %变异位置
 Pos1=unidrnd(WNumber);
 Pos2=unidrnd(WNumber);

 %变异位置不相同
 while Pos1==Pos2      
 Pos2=unidrnd(WNumber);
 end 
 
 %取数据
   S=Chrom(i:);
    
   %交换
   temp=S(Pos1);
   S(Pos1)=S(Pos2);
   S(Pos2)=temp;
  
   ChromNew(i:)=S;
 end
end

 

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2018-12-10 15:08  车间调度\
     目录           0  2018-12-10 15:08  车间调度\MATLAB\
     文件        4009  2007-07-27 14:47  车间调度\MATLAB\JSP.m
     文件         760  2007-07-24 09:42  车间调度\MATLAB\aberrance.m
     文件        2144  2007-07-26 16:35  车间调度\MATLAB\across.m
     文件        1133  2007-07-14 14:02  车间调度\MATLAB\cal.m
     文件         742  2007-07-27 14:34  车间调度\MATLAB\calP.m
     文件        1986  2007-07-25 10:52  车间调度\MATLAB\caltime.m
     文件         487  2007-07-14 14:48  车间调度\MATLAB\plotRec.m
     文件         162  2018-12-10 15:06  车间调度\~$调度遗传算法的研究.doc
     文件       87552  2007-07-26 15:51  车间调度\车间调度遗传算法的研究.doc

评论

共有 条评论