資源簡介
用遺傳算法解決車間布局問題的MATLAB程序代碼,很好很強大!

代碼片段和文件信息
function?[soleval]=f554(soloptions)
x(1:5)=sol(1:5);
y(1:5)=sol(6:10);
%傳輸次數矩陣
a=[0??572?1559?157?0;
???15?0???26???0???2;
???6??54??0????64??36;
???0??14??37???0???38;
???7??4???0????22??0];
%x方向尺寸向量
S=[3?1?1.5?1.5?0.8];
%y方向尺寸向量
L=[3?0.8?0.8?0.8?0.7];
%設備xy在x方向上的最小間距
dxijmin=0.8;
%設備xy在y方向上的最小間距
dyijmin=0.5;
%車間尺寸
H=5;
G=5;
for?i=1:5
??for?j=1:5
????delta1(ij)=abs(x(i)-x(j))-(S(i)+S(j))/2-dxijmin;
????delta2(ij)=abs(y(i)-y(j))-(L(i)+L(j))/2-dyijmin;
????%設備i,j之間的距離
????d(ij)=sqrt((x(i)-x(j)).^2+(y(i)-y(j)).^2);
??end
end
%約束1
delta11=min(min(delta1));
%約束2
delta22=min(min(delta2));
summ1=0;
for?i=1:4
summ1=summ1+abs(abs(x(i)-x(i+1))+(S(i)+S(i+1))/2);
end
%約束3
summ11=H-summ1;
summ2=0;
for?i=1:4
??summ2=summ2+abs(abs(y(i)-y(i+1))+(L(i)+L(i+1))/2);
end
%約束4
summ22=G-summ2;
if?((delta11>=0)&(delta22>=0)&(summ11>=0)&(summ22>=0))
??fsum=0;
??for?i=1:5
??????for?j=1:5
????????fsum=fsum+a(ij)*d(ij);
??????end
??end
??eval=fsum;
else
??%懲罰項
??eval=-500;
end
eval=-eval;
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
????.CA....??????1419??1998-04-14?13:26??用到的遺傳工具箱\adjswapMutation.m
????.CA....??????1487??1998-04-15?08:46??用到的遺傳工具箱\arithXover.m
????.CA....??????1495??1998-04-14?13:26??用到的遺傳工具箱\b2f.m
????.CA....??????2080??1998-04-14?13:26??用到的遺傳工具箱\binaryExample.m
????.CA....??????1504??1998-04-15?08:48??用到的遺傳工具箱\binaryMutation.m
????.CA....??????1639??1998-04-14?13:26??用到的遺傳工具箱\boundaryMutation.m
????.CA....??????1382??1998-04-14?13:26??用到的遺傳工具箱\calcbits.m
????.CA....??????4761??1998-04-17?09:46??用到的遺傳工具箱\Contents.m
????.CA....??????1451??1998-04-14?13:26??用到的遺傳工具箱\coranaEval.m
????.CA....??????1538??1998-04-14?13:26??用到的遺傳工具箱\coranaFeval.m
????.CA....??????1222??1998-04-14?13:26??用到的遺傳工具箱\coranaMin.m
????.CA....??????1654??1998-04-14?13:26??用到的遺傳工具箱\cyclicXover.m
????.CA....??????1471??1998-04-14?13:26??用到的遺傳工具箱\delta.m
????.CA....??????6837??1998-04-28?08:17??用到的遺傳工具箱\dists.m
????.CA....??????1586??1998-04-14?13:26??用到的遺傳工具箱\EER.m
????.CA....??????2348??1998-04-14?13:26??用到的遺傳工具箱\enhancederXover.m
????.CA....??????2118??1998-04-14?13:26??用到的遺傳工具箱\erXover.m
????.CA....??????1501??1998-04-14?13:26??用到的遺傳工具箱\f2b.m
????.CA....??????2322??1998-04-14?13:26??用到的遺傳工具箱\floatExample.m
????.CA....??????2137??1998-04-14?13:26??用到的遺傳工具箱\floatGradExample.m
????.CA....?????10805??1998-04-14?13:26??用到的遺傳工具箱\ga.m
????.CA....??????4253??2001-05-27?22:05??用到的遺傳工具箱\gademo.m
????.CA....??????3887??1998-04-14?13:26??用到的遺傳工具箱\gademo1.m
????.CA....??????1275??1998-04-14?13:26??用到的遺傳工具箱\gademo1eval1.m
????.CA....??????2840??1998-09-08?09:17??用到的遺傳工具箱\gademo2.m
????.CA....??????6262??1998-04-14?13:26??用到的遺傳工具箱\gademo3.m
????.CA....???????193??1998-04-14?13:26??用到的遺傳工具箱\gaMichEval.m
????.CA....????132728??1998-09-08?09:28??用到的遺傳工具箱\gaotv5.ps
????.CA....???????174??1998-04-14?13:26??用到的遺傳工具箱\gaZBGrad.m
????.CA....???????684??1998-04-14?13:26??用到的遺傳工具箱\gaZBGradEval.m
............此處省略35個文件信息
評論
共有 條評論