資源簡介
NIND=40; %個體數目
MAXGEN=50; %最大遺傳代數
GGAP=0.9; %代溝
XOVR=0.8; %交叉率
MUTR=0.6; %變異率
gen=0; %代計數器
%PNumber 工件個數 MNumber 工序個數
[PNumber MNumber]=size(Jm);
trace=zeros(2, MAXGEN); %尋優結果的初始值
WNumber=PNumber*MNumber; %工序總個數

代碼片段和文件信息
function?ChromNew=aberranceJm(ChromMUTRJmT)
%初始化
[NINDWNumber]=size(Chrom);
WNumber=WNumber/2;
ChromNew=Chrom;
[PNumber?MNumber]=size(Jm);
Number=zeros(1PNumber);
for?i=1:PNumber
??Number(i)=1;
end
for?i=1:NIND????
????????????????
????%取一個個體
????S=Chrom(i:);
????
????????????%是否變異
???????if?MUTR>rand;
????????????%工件交換
???????????Pos1=unidrnd(WNumber);
???????????Pos2=unidrnd(WNumber);
???????????while?Pos2==Pos1
??????????????Pos2=unidrnd(WNumber);
???????????end
???????????temp=S(Pos1);
???????????S(Pos1)=S(Pos2);
???????????S(Pos2)=temp;
??????????%加工機器調整
???????????temp=S(Pos1+WNumber);
???????????S(Pos1+WNumber)=S(Pos2+WNumber);
???????????S(Pos2+WNumber)=temp;
??????????%判斷個體加工工序是否符合要求
???????????WPNumberTemp=Number;?%代表工序數
????????
???????????for?j=1:WNumber
???????????
???????????????JMTemp=Jm{S(j)?WPNumberTemp(S(j))};
???????????????SizeTemp=length(JMTemp);
??????????????
%?????????????不符合調整
???????????????if?SizeTemp???????????????%選擇機器(?加工時間少的選擇幾率大)
??????????????????S(j+WNumber)=selectJm(S(j+WNumber)T{S(j)WPNumberTemp(S(j))});?
???????????????end
??????????????????WPNumberTemp(S(j))=WPNumberTemp(S(j))+1;
???????????end???????
???????end?????????
???
??
????%數據放入新群
????ChromNew(i:)=S;
end
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????1372??2015-01-08?15:41??遺傳1\aberranceJm.m
?????文件???????2236??2015-01-08?15:41??遺傳1\across.m
?????文件???????1473??2015-01-06?21:53??遺傳1\cal.m
?????文件???????1276??2015-01-03?14:20??遺傳1\caltime.m
?????文件????????178??2015-01-03?14:20??遺傳1\Find.m
?????文件???????2970??2015-01-08?14:56??遺傳1\main.m
?????文件????????562??2015-01-08?14:34??遺傳1\plotRec.m
?????文件???????4708??2015-01-03?14:20??遺傳1\ranking.M
?????文件???????5574??2015-01-03?14:20??遺傳1\REINS.M
?????文件???????1090??2015-01-03?14:20??遺傳1\RWS.M
?????文件????????527??2015-01-03?14:20??遺傳1\scheduleData.mat
?????文件???????2401??2015-01-03?14:20??遺傳1\SELECT.M
?????文件????????398??2015-01-03?14:20??遺傳1\selectJm.m
?????文件???????2977??2015-01-08?14:40??遺傳1\main.asv
?????文件????????596??2015-01-06?21:50??遺傳1\calP.asv
?????文件???????1372??2015-01-08?15:40??遺傳1\aberranceJm.asv
?????文件???????2236??2015-01-08?15:40??遺傳1\across.asv
?????文件????????596??2015-01-06?21:53??遺傳1\calp.m
?????目錄??????????0??2015-01-03?14:22??遺傳1
-----------?---------??----------?-----??----
????????????????32542????????????????????19
評論
共有 條評論