查看: 4305|回复: 0

[建模教程] 【项目总结】2018年全国大学生数学建模大赛B题简要分析（附代码）

[复制链接]

字体大小: 正常放大

杨利霞

5273 主题	82 听众	17万积分

TA的每日心情

	开心 2021-8-11 17:59

签到天数: 17 天

[LV.4]偶尔看看III

网络挑战赛参赛者

自我介绍: 本人女，毕业于内蒙古科技大学，担任文职专业，毕业专业英语。

群组: 2018美赛大象算法课程

群组: 2018美赛护航培训课程

群组: 2019年数学中国站长建

群组: 2019年数据分析师课程

群组: 2018年大象老师国赛优

电梯直达

1^#

发表于 2019-4-12 16:18 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

【项目总结】2018年全国大学生数学建模大赛B题简要分析（附代码）

今天早上跟学姐室友去复旦把论文答辩做掉了，虽然整个项目基本上是我承担了主要的思路与代码部分，但是今天答辩我跟室友竟然连一句有用的话都没说出来，全场都靠学姐开场流畅地引入，临场随机应变，从而得以与答辩教授欢聚喜散。主要原因是教授竟然准确地问到了我代码里一个细节却相当致命的问题（是一个随机初始化问题，我下面代码部分会详细提到），正好学姐室友都不是特别熟悉我的随机初始化方法，我又不能当场跟他们两个解释这个随机初始化的问题。我差点当场就要以“这样随机初始化能够减少代码量”这种蹩脚的理由跟教授争辩了。好在姜还是老的辣，辩论队队长出身的学姐一顿 Speech Art 操作成功忽悠掉了两位教授，最终两位答辩教授还是认可了我们的模拟仿真方法[捂脸]。事后细想以后我成功也好，失败也罢，恐怕也是成也言语，败也言语。也许我确实能够成为一个有能力的人，但是说话艺术确实是一门很大的学问。不过看我运气一直这么差，大概率还是凡人一个落入俗套吧[摊手]。

言归正传，本文主要介绍我们小组解决2018年全国大学生B题的思路分析，不代表标准答案。当然我还是有自知之明，本身水平不是很高，再加上三天时间限制，自己做出来的模型以及算法肯定是比较差的。这里仅仅从我个人的思考角度出发写一些参考思路作为分享讨论，希望各位读者朋友轻喷。

问题分析

今年的B题确实与往年有很大的不同。往年的数学建模问题往往具有比较好的开放性，问题解决存在较大的建模空间。今年的B题的题干本身就几乎是一个明确的模型（8台CNC+1台RGV+CNC定址），加上第二道任务要求我们根据给定三组数据完成八小时内的RGV详细调度方案，并写入四张Excel表格，给人的感觉就是要求我们去完成一道填空题，然后附带写一篇论文[尴尬]。

为了方便各位读者对赛题的阅读，这里给出链接：https://download.csdn.net/download/cy19980216/10708725

问题一共有四种不同的情况：一道工序无故障，一道工序有故障，两道工序无故障，两道工序有故障。

一道工序无故障

第一种情况是最简单的，直观上直接不停地1234567812345678……按顺序上料差不多就是最优了。但严谨地来说，虽然题目中给的三组数据确实都是用这种最幼稚的策略能够达到最优，但是如果对于一般的情况而言，比如最极端的情况下，RGV移动时间无穷大，那RGV显然就只会不停地在121212121212……这样原地上下料了。

然而我们发现无论参数怎么变化，最终RGV给CNC上下料的过程始终是一个周期性过程。当然这个似乎很“显然”的事实却是相当难以通过数学严格证明的（参数已知的情况下一般比较容易证明，但是所有的参数都是未知的情况下是很难严格说明的）。我赛后也仔细的思考过，但是也没有得出很漂亮的证明。我最终仅仅是针对给定的三组数据使用了遗传算法对RGV前17次上下料（17次是考虑从初始状态开始循环两圈的最短路径）的最优路径进行了搜索，并且利用穷举证明了这是前17步最优的上下料次序。之后基本上就是不断地循环。

这里的模拟退火遗传算法比较鸡肋，所以我不详细说明，在第三种情况我会详细说明模拟退火遗传算法的原理。

以下给出第一种情况的模拟退火遗传算法算法以及对应的穷举最优证明 ↓↓↓
# -*- coding:UTF-8 -*-
"""
作者：囚生CY
平台：CSDN
时间：2018/10/09
转载请注明原作者
创作不易，仅供分享
"""

import math
import random
import itertools

""" 选取一组数据 """
T = 580
d1 = 23
d2 = 41
d3 = 59
Te = 35
To = 30
Tc = 30

CNCT = [To,Te,To,Te,To,Te,To,Te]    # CNC上下料时间

N = 50
L = 17

varP = 0.1
croP = 0.6

croL = 4
e = 0.99

tm = [
[0,0,d1,d1,d2,d2,d3,d3],
[0,0,d1,d1,d2,d2,d3,d3],
[d1,d1,0,0,d1,d1,d2,d2],
[d1,d1,0,0,d1,d1,d2,d2],
[d2,d2,d1,d1,0,0,d1,d1],
[d2,d2,d1,d1,0,0,d1,d1],
[d3,d3,d2,d2,d1,d1,0,0],
[d3,d3,d2,d2,d1,d1,0,0],
]

def update_state(state,t):
length = len(state)
for i in range(length):
if state < t:, P' a3 [& z# i7 R' x$ H
state = 0
; M$ D4 y" [, t: @! s9 ?' i else:8 v# }/ E+ H& D' l+ N
state -= t$ G) W7 k  v7 J' c& u
return state
7 [  Z- K- _5 t) P5 C% a! E
6 [0 b1 B$ L- H8 Q1 Xdef time_calc(seq):6 P9 g8 t! m0 b0 J( K8 B9 b. ?
state = [0 for i in range(8)]         # 记录CNC状态$ H* F$ O: b% y6 J+ f! P0 n9 m
isEmpty = [1 for i in range(8)]    # CNC是否为空？3 H6 k$ L) U  G, F, U5 K1 A
currP = 0! \7 H! Y4 J( `* L/ o9 Q1 w1 K
total = 0
4 @! b! S# J! I9 [2 {7 J length = len(seq)6 u) Y5 Z# e' ~
for No in seq:
. \% @' K, [0 ~( v nextP = No% g$ `( v8 x- ?7 c( j, B' e% N( k
t = tm[currP][nextP]7 b+ u5 l& ?) U5 K; c' B4 i
total += t    # rgv移动  J+ m4 m+ z. X8 \3 l+ A
state = update_state(state,t)    # 更新state% o! H0 [, u% C% B4 I' P2 n# Q
if state[No]==0:    # 表明CNC等待  G! b4 e5 H. P( D" ?
if isEmpty[No]:    # 当前CNC空/ J/ n% E& V' [6 Q' p& q9 m
t = CNCT[No]8 d4 H+ Z! S* n$ [5 M
isEmpty[No] = 07 B1 Z3 p: H. n4 F6 \
else:
7 j6 e3 S# ]' ?% @; }  K" @7 K t = CNCT[No]+Tc
, S0 N3 P+ j$ o6 i* g; I* j total += t( M, Z2 l, N1 T4 G- l/ X
state = update_state(state,t)
state[No] = T& s- u; B) ^1 P7 E3 l
else:    # 当前CNC忙1 N- G7 _* e6 |: F; z, q! {
total += state[No]    # 先等当前CNC结束
3 F, k. h2 A6 q% w5 L, y9 r state = update_state(state,state[No])
* ~5 {/ R( b1 Y$ W) [9 f t = CNCT[No]+Tc% w: |7 E  f0 |3 t8 ]
total += t+ V# E0 r; l+ I9 O1 \
state = update_state(state,t)+ {" O0 i3 x9 X  o7 E( ^& f  K
state[No] = T6 l7 B0 V, M8 K& r) H2 `
currP = No
; I, M4 J. c; f total += tm[currP][0]9 x2 w9 a7 g/ I
return total
& y  j1 S0 d' P% c6 d5 C$ e9 i8 f! E
def init_prob(sample):
: m4 l& o( X; J% L# K& s prob = []& e1 ]* u! _: q+ K" y
for seq in sample:
  ]: b% t8 D, x& M( D" | prob.append(time_calc(seq))
7 {% M; O, h4 t: s3 U! B maxi = max(prob): P" i0 I, a3 E2 d2 X4 L) i
prob = [maxi-prob+1 for i in range(N)]3 e$ e5 ~* }0 _9 X* n% ]8 M3 A
temp = 0
% \; f/ s) p( o' Q! q for p in prob:
( I: _6 X0 A& M- o2 Y temp += p# N! a# q1 o0 ^/ A) K$ a2 Z
prob = [prob/temp for i in range(N)]9 A/ y4 Y7 J+ }% N  i
for i in range(1,len(prob)):9 V9 P- ^' Y7 r9 f- W1 z  e
prob += prob[i-1]
6 b0 `- A; V2 Q9 r prob[-1] = 1    # 精度有时候很出问题5 Z4 A0 e1 F: S0 b( ^
return prob
0 H: a6 g- m5 w+ b  k/ C1 N! I# x2 t* Y& A* O. }
def minT_calc(sample):* l1 A- \( {7 t( ~/ b! Z4 Q
minT = time_calc(sample[0])# _% N0 R3 M2 {* V+ \4 i  ~/ X
index = 0
# c' d0 H+ Q+ Q  ]( N for i in range(1,len(sample)):, E, V1 O) l( m# T- S) ^4 U2 e6 c
t = time_calc(sample)
* A1 p& L8 ]+ _4 y/ @: S if t < minT:+ D4 q% d9 H/ u' Y- A
index = i
; Z* F! g, _2 X8 f% a3 p7 A minT = t
9 M8 L* h& @" [' A# Q& ~ return minT,index3 S- o: Y1 A" W' Q; f7 Q$ T( Q
8 D; Y2 A$ U0 a+ q) t' @5 n3 P9 K4 ~
def init():3 ~) `3 T" V- b
sample = []
' X  s1 Q9 N$ T for i in range(N):
( h$ z9 N; K- F1 a- c+ J* {# R% h# n sample.append([])1 i4 ?0 P7 b2 ]- `* f9 D3 C, l
for j in range(L):
1 E# k/ u+ Z+ F sample[-1].append(random.randint(0,7))
6 Z( N) l' h3 C return sample
- V7 N5 i0 {$ h& V3 D
* v" C2 V4 i( Adef select(sample,prob):    # 选择
. @6 S% G3 V' V% W' C, u' o sampleEX = []/ Z* U" c3 r! j7 I0 ^& d" H- g+ G/ |- k
for i in range(N):    # 取出N个样本& j5 {5 F/ W) y. ~
rand = random.random()4 g; [: ^* Y# |' o
for j in range(len(prob)):3 V# h5 u) ^7 ]: `( \" b2 R
if rand<=prob[j]:
3 L4 k, K6 h  x3 y sampleEX.append(sample[j])
, F4 v. E+ G+ O5 V0 R9 x break
+ M& }! z: k! }- B% n8 X return sampleEX3 T: \+ c3 h: E* t

) b3 _$ B( L6 l/ R" s2 Vdef cross(sample,i):    # 交叉
* [8 ?( I; _* M, m0 w for i in range(len(sample)-1):
& `( R' @# {; C; M2 h for j in range(i,len(sample)):
1 }) z: m+ x. @4 B) _3 W rand = random.random()7 \9 J1 r' ~4 H
if rand<=croP*(e**i):    # 执行交叉
2 @8 C+ M$ v+ u$ M) C loc = random.randint(0,L-croL-1)& Y7 D4 X4 h2 Q. Q/ f: o
temp1 = sample[loc:loc+croL]% k! N* R' g7 v. `- ?  G
temp2 = sample[j][loc:loc+croL]2 B- B* I: ]0 K" i' s
for k in range(loc,loc+croL):+ l) _  g# t" A. ^% e& E
sample[k] = temp2[k-loc]
4 V$ S- i/ X2 h sample[j][k] = temp1[k-loc]
0 n& [. C! c! a% _% r% `! | return sample
( Z3 c( g: L1 L
! m. F% R1 V1 o4 qdef variance(sample,i):    # 变异算子    * x6 ~$ }( z1 @% o/ Q* e
for i in range(len(sample)):# c1 h; ]2 u* A& Q1 t% }
rand = random.random()
; U/ H/ l% i+ T- Z0 A& K  P if rand<varP*(e**i):
5 b: M* P/ ]& I  L, Z: E1 j rand1 = random.randint(0,L-1)
8 r. B' |2 r3 G6 S/ d9 h1 ? rand2 = random.randint(0,L-1)6 H# K. @' j) r" z
temp = sample[rand1]# y$ h8 k, b5 T. n  I( ^, K
sample[rand1] = sample[rand2]
/ E+ Q( C3 z) K2 e sample[rand2] = temp8 D8 _8 t+ h, P
return sample
! z1 \3 u/ ^5 h0 c
" K4 c" [. v# `% b* c2 ?9 Vdef main():7 A8 f/ W& f7 v/ s& I# T
sample = init()! W9 j. m% ~! H% ~9 ?9 k, I
mini,index = minT_calc(sample), ~7 c8 _  D) `5 |! a4 A7 r2 b
best = sample[index][:]
# f" @/ [$ W1 B3 T print(best)
' Q+ s$ C: _) E4 d- B# ~ for i in range(10000):$ w, A) [9 c! _
print(i,'\t',minT_calc(sample),end="\t")
5 S1 [9 i6 A  h1 U+ V2 r( N prob = init_prob(sample)
4 k& r) y  Y4 y9 e4 P+ P sample = select(sample,prob)( R/ O: E8 M- q
sample = cross(sample,i)
6 I: _) g, l$ G sample = variance(sample,i)
' h0 g8 M* n5 M. ^6 N  I4 o2 r9 { mi,index = minT_calc(sample)0 `8 R5 n1 X2 f; Q0 C& \' w
if mi>mini and random.random()<e**i:    # 精英保留策略9 Z. a/ h6 E  p( _5 X+ Q
rand = random.randint(0,N-1)$ U* W8 z3 ]" z, w
sample[rand] = best[:]
! T3 _! e. N3 J, b& ~# `8 j! A% @3 ] mini,index = minT_calc(sample)
2 \6 q7 X+ d7 u3 X4 y! ^  v best = sample[index][:]0 Z! p6 A0 U; x) @3 |) j
print(best)! q* N. ], A! K; a4 |
print(sample). w# p! Y0 \6 i: n: I( I

1 @$ o% _+ g1 W+ {0 L- @+ I: }5 f% jif __name__ == "__main__":
0 D' ~4 @. s5 o/ `; L main1()
7 x; H: D1 a' G' h. W' A """ 穷举搜索验证 """: N; C8 s' V4 a5 J( ?6 W' d
a = list(itertools.permutations([1,2,3,4,5,6,7],7))
; G7 ^' W  I7 [6 L ts = []& V4 M8 x8 j+ O) S# x0 O
first = [0,1,2,3,4,5,6,7,0]  U; r' B8 A% q2 @
for i in a:
3 b6 @6 i8 d3 g' F$ M temp = first+list(i)
8 N  P0 t' m$ U% ?; V temp.append(0)
& r" @1 f1 v( z# u8 r2 Q t = time_calc(temp)
" P! r! Z& Y% a ts.append(t)2 N" _4 B2 }( q# D6 n
print(min(ts)) - v! N+ X$ [& B
print(time_calc([0,1,2,3,4,5,6,7,0,1,2,3,4,5,6,7,0]))/ R% X! M/ [  j. T: S! v7 K" n

5 |: r& p' f0 m$ U/ Z1 `; x/ |! v9 D/ Z5 E: D% H/ Z7 q- b- u: n
一道工序有故障
* s! ]" n# K  G0 F5 I
  u* `( }, c7 w7 [) z这部分是学姐做的，学姐用了偏数学的思考方式，仍然从循环的角度去考虑，主要考虑故障发生是否会影响当前循环，是否需要建立新的循环。因此就没有写代码处理问题了。具体的思路我确实不是很能讲清楚。但是这里面有一个非常大的问题，就是如果出现多台CNC同时发生故障怎么办。关于多台机器同时发生故障的概率，我们通过估算认为以给定的三组数据8小时内会出现这种特殊情况的可能性大约为30%。这个问题是我无法很好严格处理的（当然如果用贪心算法也就没这么多事了）。9 U- D9 r$ {2 |/ S" m$ a' J/ u

* C3 p, b0 o- w两道工序无故障 & 两道工序有故障
+ B& ~' ]3 Z! c0 p5 B: l. ?* n/ q  `$ h+ y2 L* p! B
这两个部分都是我来处理的，因为使用的方法大致相同，就并在一起说了。5 a' W7 z& t" s$ c) P  T
, c% ?- c2 H6 _, {
两道工序与一道工序最大的区别在于三点：+ f$ ]! a9 `# s% B4 c+ y* c

' T- ]6 M) H( W& }# j4 f! U5 I1、开始要处理CNC任务分配：分配给第一道工序几台CNC，分配给第二道工序几台CNC？具体怎么布局？  z8 a9 N/ I# U

# G1 m7 P' K, A2、加工过程可能仍然是一个循环，但是这个循环将可能会非常的庞大以至于不可能直观的看出来。! f9 B" C3 I- i) ]! `$ Z# D7 b+ B$ m

3 z7 N" G6 y% t0 b3、两道工序的分配已经是一个严格的NP难问题了（即理论上无法在多项式时间内求得最优解）。
1 N. q+ g; J4 U+ Z* S3 {' Q
. h# h1 f, j2 A$ P# ^2 t第一点我的想法很单纯——穷举，没错，就是穷举，除了显然不合适的分配方案外，其他方案都试一遍（虽然真的很蠢，但是我真的想不出到底能怎么办了）
" M! e6 X7 A: _
4 ]5 Z7 Y6 D! C. L% ^$ z3 m' x9 q第二点因为不存在循环则使用遗传算法需要设定一个相当长的染色体长度（我们设定的染色体是RGV为各台CNC上下料的次序，如果要考虑全过程的模拟退火遗传算法，则染色体长度大约在300~400左右）。事实上我也尝试了这个方法，结果从我写完这个算法我开始跑，一直跑到比赛结束算法依旧没有收敛[捂脸]。这里给出代码仅供参考（各位朋友要是有好意见也可以提出） ↓↓↓3 N& {9 D/ d6 z& a9 Q( w
7 V8 B: v, `( a$ G" V, P; x, c9 l
# -*- coding:UTF-8 -*-& f: W& Q0 q; l  ~4 |4 b
"""
: H. A8 Q+ V- {5 f: ?$ W4 P7 q8 h 作者：囚生CY
/ W9 w! |" X, Z: V! D 平台：CSDN
) e% \% X) O3 ^$ \" } 时间：2018/10/09
2 R3 R' f  s" D  G9 q; b$ f& N 转载请注明原作者, S8 g; W/ h: c  o5 Q" Q
创作不易，仅供分享
. h; P) u0 |. j2 Q"""
$ I, n' A, L, F' r) p6 q% ximport random* Z! @8 w# w1 O; c+ e
4 V0 M2 b* n+ y: i8 C
# 第1组
4 B  I% D3 i! x4 B7 w" V6 I"""" k# v1 L; h$ y% T
d1 = 20! V- g3 j3 W; f9 F' c
d2 = 33
6 w1 D( @  ~/ ?1 }9 u* ~d3 = 46+ s% }; D6 d0 ~# v1 m5 }
T1 = 4006 C5 K, L6 w* ?9 m  f  G
T2 = 378
5 z6 H5 s& `$ q7 c) h, @2 kTo = 28) _. B1 E; V$ |
Te = 318 {  |$ Y2 @* d% q9 ?, _5 f
Tc = 25
8 c5 B( g; }: T5 I% C"""5 `5 ]& m) B+ z4 W. x+ v

: ]. x: M; ^/ |9 z2 o7 N# 第2组
4 `/ f1 \( G! B/ h"""5 d3 L" s6 c, x; J
d1 = 23
; f. X2 ^* g+ Nd2 = 41
  w* Z% I5 i: ^+ fd3 = 59
$ S: N0 D5 m$ h/ S3 @! FT1 = 280% h; I( k+ k4 F& O# A* S6 b9 i' ]
T2 = 500
( d. _( t- F2 _& yTo = 30% e# p6 ]8 x. }3 F
Te = 35* f. s) g+ x! k: R
Tc = 302 K' }! t' k# l; y9 V& {
"""
! b" h# J6 ~( t" Z: E( m  x- `
: K9 A) e; Q3 R4 m' }, t. S# 第3组
! a, Q! p2 O' o& l5 [" G: }/ U, Nd1 = 18/ {  N: R  r4 W: G1 G" Z* }
d2 = 32
' u% J3 x0 F, |d3 = 46
  l; R0 [% `7 M1 J" `& `6 NT1 = 455
' j# S/ P* A5 f; h3 ~% O9 w1 lT2 = 1821 e+ G* Q% T( z- i, Y6 P+ _; t1 j
To = 27
% y( I# Q7 A4 s% z/ @Te = 32, J! c6 ?/ g; g3 U1 q& k, |3 ~
Tc = 25
3 a; v' V, x) ]5 n# k6 A6 r! g" E* B
& o. t+ w! B" w0 t6 }( Y$ QcncT = [To,Te,To,Te,To,Te,To,Te]
6 V2 `0 U8 ]/ r- H1 P( Vtm = [
8 d" y4 C1 n2 ~ [0,0,d1,d1,d2,d2,d3,d3],' ]# H: p) {. t, V, a; `! f" \# }. B- |
[0,0,d1,d1,d2,d2,d3,d3],* }6 ~8 T- E+ k/ y* S- n2 ^* U
[d1,d1,0,0,d1,d1,d2,d2],$ K( z, L# C4 g3 K& v! E+ S2 I( X
[d1,d1,0,0,d1,d1,d2,d2],
" u; N5 I' b8 }& h6 P [d2,d2,d1,d1,0,0,d1,d1]," ]( q- }: l4 R/ g1 _
[d2,d2,d1,d1,0,0,d1,d1],3 L- h% H+ Y/ b3 }: r  V
[d3,d3,d2,d2,d1,d1,0,0],
5 e% s0 _  K& k; G [d3,d3,d2,d2,d1,d1,0,0],
& f" M$ d" m3 y5 w) |+ R' |, U% D5 E]
8 M1 X. }- G4 p; S  G9 }# ^; oType = [1,0,1,0,1,0,0,0]    # CNC刀具分类4 J: Y) f8 n4 R: x

7 h7 |- x; k2 n- f; p5 a/ _. oN = 64- l5 s2 n7 n& C$ a  Q% ]; P" @
L = 100( E2 Z' Q6 j2 K4 J
varP = 0.1
5 `1 K5 A7 y8 b. ~7 YcroP = 0.61 U4 Q+ `/ A3 W/ m0 J
croL = 2
5 w# j" p5 d$ O7 ie = 0.990 r) ^2 v+ `0 ?- A2 E% S
1 d/ W( I! u$ J; x- R& H
def init_first_round():    # 第一圈初始化（默认把所有第一道CNC按顺序加满再回到当前位置全部加满）  u. g# i3 w3 G4 L
state = [0 for i in range(8)]         # 记录CNC状态（还剩多少秒结束，0表示空闲）
( I  |# ~+ E8 ]) w+ L5 Y( t isEmpty = [1 for i in range(8)]    # CNC是否为空
  E) x: }0 ^7 Q! c% S rgv = 0    # rgv状态（0表示空车，1表示载着半成品）/ `+ Z: g, ^# j6 `
currP = 07 r* A- i1 }; _/ c
total = 0
, H( L5 ~+ Z3 N1 `# A seq = []
4 }2 G8 ]8 a6 n flag = False$ {& l8 Q+ r: M, c( Z: J
for i in range(len(Type)):
/ `, u; m+ B0 f' r. w- o0 S if Type==0:
/ _; ?& K9 M' e. w+ W seq.append(i)
( K* [! [* r% g  s4 p' c flag = True
' `5 t/ M- N4 `& Z, { currP = seq[0]
2 X# o  K# ~. x3 v: }& p% f. s8 n seq.append(currP)
# ^/ D) o* P8 j' k( O rgv,currP,total = time_calc(seq,state,isEmpty,rgv,currP,total)
# t) s, [3 y8 |: B0 J% ^' F" ~ return state,isEmpty,rgv,currP,total,seq7 ^3 d6 \" k9 M  @

/ v; t- Y; @* S( Qdef update(state,t):
" j; R  c  ?$ P8 {  Q' j for i in range(len(state)):1 X2 P& W3 C) Q  }
if state < t:2 ^; [9 |; P5 f1 h# X3 E
state = 0; D( c, D( K$ `( I1 i
else:( K7 }4 S4 Y. f$ s0 S% T1 R3 K2 h
state -= t; o" y5 Z5 n* N( u

. C: E: e1 f4 f. u+ mdef time_calc(seq,state,isEmpty,rgv,currP,total):    # 事实上sequence可能是无效的，所以可能需要
3 t/ M' |! E- w5 x index = 0' b  z, l! l! u1 g9 {( I
temp = 09 K9 J' Y+ P" H6 d
while index<len(seq):9 {/ J; s3 R" q3 x9 L
""" 先移动到下一个位置 """3 _6 `& c! e1 n
nextP = seq[index]
6 W# ?7 p9 Y2 j' k3 C t = tm[currP][nextP]
: ^; t  D9 m' M8 A( O/ u: W$ s' E total += t+ p& g* q' F; p9 B; O
update(state,t)
4 e9 f; Y" r# I, ~ if Type[nextP]==0:    # 如果下一个位置是第一道工作点
6 p# F5 R; c4 b, ]4 l3 _# r0 d3 M if rgv==1:    # 然而载着半成品/ }" U( S! {5 m. F5 p/ _1 n, h
seq.pop(index)    # 去掉这个元素并中止当次循环进入下一个循环
! ]2 ^0 C; V5 P& ^) }- V continue
- t4 q, j4 V' g1 ?  x if isEmpty[nextP]:    # 如果下一个位置是空的2 e8 [% C  O" m& }8 z
t = cncT[nextP]
6 q9 o. V& n1 |, ?! l+ V* F; m total += t' @8 v/ ~% e; J! [; D
update(state,t)
/ @2 k4 k7 w* f# _& `* Z state[nextP] = T1    # 更新当前的CNC状态- X/ `9 s+ [1 |+ g
isEmpty[nextP] = 0    # 就不空闲了
, e1 A6 \4 l* F+ [5 n  Z9 I else:    # 如果没有空闲' v% o* G- n" V4 }
if state[nextP] > 0:    # 如果还在工作就等待结束, l! H- Q9 t0 l) m; E
t = state[nextP]: t# l" J+ J* I/ z
total += t. R+ a  w4 _& G2 ^- k8 y4 m5 |
update(state,t). a) B( P0 r. p: \: f
t = cncT[nextP]    # 完成一次上下料% g5 ?+ `6 ]5 l9 l  v/ }. f
total += t+ _" Q3 E5 J9 }; u, [! a
update(state,t)' F# D  s2 i' `: Q5 E7 R) }6 [0 S
state[nextP] = T16 Z" i3 {6 M# r+ _0 E/ u
rgv = 1
5 m+ V& \, g. q( c% T9 [1 p else:    # 如果下一个位置是第二道工作点+ ?: R9 v% \  }9 F, u
if rgv==0:    # 如果是个空车% o+ ^% J& b3 n. {! h
seq.pop(index)    # 删除当前节点
& e" I: _3 `  Y0 n continue4 c9 ~  \& Q2 b' [
if isEmpty[nextP]:    # 如果下一个位置是空的
( D( {3 h6 v; F- G5 P7 E( L t = cncT[nextP]* [' o3 N' I$ H
total += t! a& ?' q) A; T* E4 \; Z
update(state,t)3 s5 y1 }6 O/ R8 e  o
state[nextP] = T28 U5 K& m8 G/ X9 X0 u0 j- N
isEmpty[nextP] = 0 ) }6 O: C2 Y: }, c
else:    # 如果没有空闲
& W7 c# X5 ~# X6 p if state[nextP] > 0:    # 如果还在工作就等待结束: O4 m$ U( r6 y" }/ d
t = state[nextP]) Y$ u8 [$ P2 n$ r' h
total += t2 R* s: Z; `3 D7 D
update(state,t)* j! @7 H2 m! d$ f0 F4 Z/ e
t = cncT[nextP]+Tc( \" V/ r4 V: w/ K' d
total += t8 i# \' ~" ~- {1 X; B6 ^8 C
update(state,t); o* L9 b6 p0 F0 S- H
state[nextP] = T2
7 Y! q1 X) b) E# r) F4 E$ ~0 y3 a rgv = 0* B8 ~7 O' x, ~! R
currP = nextP
# E3 w6 p4 X6 B. X) h" u temp = total
" q% I8 Z' U) h' G/ n index += 1
! N; P( U* `6 v: M9 L' a: A! n total += tm[currP][Type.index(0)]    # 最后归零
$ U. B" R/ g! e1 s' O return rgv,currP,total* W$ V, o  Z+ }
3 y3 [: S5 o$ |' }/ p" F1 a# L5 \2 x
def init_prob(sample,state,isEmpty,rgv,currP,total):    # 计算所有sample的
& s4 U2 a1 a+ T) P prob = []
4 D) h2 e' {3 X, _3 q/ q" r7 R  q: s for seq in sample:5 z' z: A: {" Z6 G! v
t = time_calc(seq,state[:],isEmpty[:],rgv,currP,total)[-1]
& g/ H0 c% A) A' o0 |# ~% h prob.append(t), \% e) K- L( u) I- E& j9 S! c
maxi = max(prob)1 T- ?  A# X; x* {( q
prob = [maxi-prob+1 for i in range(N)]
" J% V8 p2 D' |: i. q; r" H temp = 0! h# j% ~2 N) J/ J
for p in prob:
9 Q1 o9 C& W( m" l8 C- z; a. O temp += p
! `& `: |* R- }$ s# L$ v4 Y prob = [prob/temp for i in range(N)]
. E! E/ r& a5 I8 J) o! I7 R: E for i in range(1,len(prob)):' L7 w9 S5 H( }3 w
prob += prob[i-1]
& o. q) p" E/ K0 D prob[-1] = 1    # 精度有时候很出问题
' z9 J" ~& m+ n, t6 K return prob
; M+ [0 ]% K% m7 D0 Y2 J
7 e* _, U$ \- J$ F9 T8 Q# B: _def minT_calc(sample,state,isEmpty,rgv,currP,total):
1 F7 p! Z" ?2 S2 j minT = time_calc(sample[0],state[:],isEmpty[:],rgv,currP,total)[-1]
, Z7 b# P* Q! V index = 01 t3 W2 j* g, u9 ?7 z4 S& p
for i in range(1,len(sample)):
$ B2 o3 \, s3 \ t = time_calc(sample,state[:],isEmpty[:],rgv,currP,total)[-1]
: u( L+ O1 S* i% Y; C/ k if t < minT:
; Z7 D- O% y0 b6 s: q index = i7 E7 l4 D! _2 n! J" D: u$ S
minT = t8 ^; S% m* @5 ^% Q& d: Z
return minT,index
$ ]; S3 j8 D( r* F0 G$ M/ { ' T6 K1 R( |3 E
def init():    # 初始化种群（按照第二道工序，第一道工序，第二道工序，第一道工序顺序排列即可）; {% Q  a3 x' k! F" J3 p
sample = []8 W) Z5 x8 T; B/ \( \
refer0 = []
7 X) G- K$ [+ J4 f$ ]1 U' n% J refer1 = []: D$ H( ]9 ]' e
for i in range(8):
  ~+ z5 F; g. V* H" Y! y if Type==0:/ i& U" e6 v0 `
refer0.append(i)
( L; b" C# o; {. {3 T else:$ a2 p$ @! V1 E# B/ E/ H
refer1.append(i)& x& J6 S& R4 _3 R# r
for i in range(N):% |# U1 f1 ]0 e4 }0 W
sample.append([])2 a' T6 I- ]/ I% R& T# e  w) C
for j in range(L):
3 e" p1 s) A, l9 a if j%2==0:' x( D* b0 k1 T+ S0 k2 W
sample[-1].append(refer1[random.randint(0,len(refer1)-1)]). }; _' t. p& j% a
else:) k" K) {  ^# N( z
sample[-1].append(refer0[random.randint(0,len(refer0)-1)])
! o8 f) D- ^2 O+ Z, S$ q return sample
+ O# U: {0 o2 [: `9 u0 P' F. _( x1 o( k; D! L+ g
def select(sample,prob):    # 选择算子( T3 m5 k; e% u, l! |4 T& U
sampleEX = []8 a3 j# Z5 ^' F1 Y/ m3 F3 T
for i in range(N):    # 取出N个样本! ]6 q. G+ x/ d+ Q* j1 u
rand = random.random()
" [5 i8 x2 f& c6 Q0 G8 u for j in range(len(prob)):
3 c, E# |7 Y$ x8 g) x if rand<=prob[j]:; t/ p) a2 s% x0 I. U0 N
sampleEX.append(sample[j])
# u3 a$ I/ }0 v break7 c5 A8 b, u$ G6 V
return sampleEX4 E5 b& [; O: g/ {9 d/ o5 I
# N* Z8 }( i, b
def cross(sample,i):    # 交叉算子
  r, `& Z7 {, Q7 `% L1 M" v) d for i in range(len(sample)-1):
3 s  r3 _0 g+ E0 B- B& ` for j in range(i,len(sample)):
% {4 v& v2 J' l! b1 L9 r rand = random.random()
% _7 s; h5 e! H/ d' _ if rand<=croP*(e**i):    # 执行交叉
! A, @( U: o7 y! L% }$ Q/ x2 C loc = random.randint(0,L-croL-1)
, }, p; g/ w* }4 g8 ^1 J temp1 = sample[loc:loc+croL]
: D' W4 J1 w2 s$ q6 K temp2 = sample[j][loc:loc+croL]
& y6 m/ l  p% I) o+ z  I for k in range(loc,loc+croL):
  T" U) F- [* B sample[k] = temp2[k-loc]
+ D5 S+ \+ s1 u( `7 c% X" Z6 g sample[j][k] = temp1[k-loc]7 n/ `3 k) H: e, [8 f; N1 M. m
return sample; L  Z+ M; @; B: e8 e$ y2 e: Y

! |$ d8 Z4 f8 w/ Sdef variance(sample,i):    # 变异算子    ) Q; k7 [% T9 s! t: J
for i in range(len(sample)):8 f0 F2 ^  V4 X, ^2 @$ Y
rand = random.random()
2 T3 M3 q0 \, e5 z7 U if rand<varP*(e**i):% M+ F9 A4 J8 L9 k4 d* N
rand1 = random.randint(0,L-1)
0 s$ k. ?& @3 B/ M, v/ l randTemp = random.randint(0,int(L/2)-1)
, {$ o1 Y; l2 u7 `1 a; ] rand2 = 2*randTemp if rand1%2==0 else 2*randTemp+19 |9 R9 E% ?, {7 a$ @3 y
temp = sample[rand1]
, G; ~3 G, ?$ C sample[rand1] = sample[rand2]
+ z" @  @3 }3 E) e0 Y sample[rand2] = temp
3 r, ?2 ^2 n! L. a return sample6 D8 ]* I0 O' W6 G- B0 }' c- h

0 ?7 N' r1 w& f6 H/ z# K5 i8 Aif __name__ == "__main__":; g1 r% g/ S) ~
state,isEmpty,rgv,currP,total,seq = init_first_round()1 W2 ~! u! _% r$ a
print(state,isEmpty,rgv,currP,total)& g  m5 |8 ?2 E
sample = init()
' X$ I: ]! C" y. N+ F- R mini,index = minT_calc(sample,state[:],isEmpty[:],rgv,currP,total)
9 _( H, T5 v  K& h" t0 {: a best = sample[index][:]
' Q0 _# D; ]9 p! J+ O for i in range(100000):# p# A, w" v3 U
f = open("GA.txt","a")6 ?# Y' K2 b2 b1 n; ?1 R  k
tmin = minT_calc(sample,state[:],isEmpty[:],rgv,currP,total)[0]% l* W& ^9 ^$ u: q# m. Q
f.write("{}\t{}\n".format(i,tmin))
1 _# V' v. R6 [! a# ]) X! k print(i,"\t",tmin,end="\t")
; g) g  h* y* O prob = init_prob(sample,state[:],isEmpty[:],rgv,currP,total): X! O' v# q4 A- `
sample = select(sample,prob)
2 T, H/ b; c8 ~9 X9 s0 z sample = cross(sample,i)
' R2 r3 T% S3 @  N  Q: k/ N7 p sample = variance(sample,i)+ G* Q1 y' }  B- Z6 w3 n- O9 i; }+ R3 l2 M
mi,index = minT_calc(sample,state[:],isEmpty[:],rgv,currP,total)% }/ p% W! z5 x2 A$ U' ~
if mi>mini and random.random()<e**i:    # 精英保留策略! Y( E$ E; z: c! ]4 W% _  C
rand = random.randint(0,N-1)
6 M% X2 z2 g. m4 g% ]3 Q: N sample[rand] = best[:]
+ {' O* b9 C# |4 n- X mini,index = minT_calc(sample,state[:],isEmpty[:],rgv,currP,total)
2 _6 l1 |% K0 T2 X, @ best = sample[index][:]
" b' G. X# L& Z( {# k8 P. I print(best)
3 ]1 H1 \$ o. ~7 ]& _+ q  ~0 d1 U3 A f.close(); ?2 ]0 D2 o7 x& k# I/ a
print(sample)
4 e) {8 ^* F2 I  E/ D: J8 I' ~遗传算法这条路被堵死后我一度陷入俗套，用最直接的贪心搞了一阵子，觉得用贪心算法（即考虑下一步的最优策略）实在是对不起这种比赛。然后我就变得——更贪心一点了。
; j% ^# M" Z8 n% |3 ^) Y: G& W0 Y" ]7 `
我试图去寻找接下来K步最优的策略，然后走一步。K=1时算法退化为贪心算法，最终我们设置为K=4（当K>=8时算法速度已经相当缓慢，而4~7的结果大致相同，且K=4的速度基本可以做到2秒内得到结果）。1 t; f* V$ d' c5 W0 Z

  V* `# J$ e3 D值得注意的是我假设RGV在两道工序下只能由第一道工序的CNC到第二道工序的CNC（忽略清洗时间情况下），然后回到第一道工序的CNC，这样往复移动（这里我不说明为什么一定要这样，但是我认为确实应该是这样）。在这个规律的引导下我大大减缩了代码量以及计算复杂度。4 [4 e1 K, Q) W* o* U+ C, V

" ?; E8 M# m) h- D然后到第四种情况我们已经没有多余时间了，只能延续使用情况三的算法，进行了随机模拟的修改，完成了第四种情况的填表。! ~3 x  p1 l0 T, J  _

# M* m0 |% @+ b7 I( O! |# ?; `以下是第三种情况的代码（第四种类似就不上传了）↓↓↓
+ }8 L+ ]! r* c/ q1 I" l% [
6 {# {, P2 o) H3 g" i; V. h#coding=gbk
7 v/ a1 H. A7 y1 F6 O% p9 \2 f) limport random+ h9 C- D9 G0 f
# -*- coding:UTF-8 -*-
% G; [2 ~" A, {- q$ I$ V"""
; z; U: v! R( Z  R/ P/ N5 ` 作者：囚生CY
2 Y% \3 A! _8 i8 k 平台：CSDN
( C0 t: j/ C# |' r2 I 时间：2018/10/09
- }2 M- h7 L( x6 A% O: W; @. _ 转载请注明原作者0 P0 s8 H2 P: x' N+ N
创作不易，仅供分享9 ]- Z1 C' S: q. t, r
"""9 {8 c* m2 P# G( E, m
from tranToXls import *9 d) @9 D# w" w- `, R7 V3 J

3 d; d: W3 ~/ g# 第1组' [$ B  c) P$ Q3 H0 L
"""
; r. x& W/ ^3 M9 c; Md1 = 20: U1 _& S: l# H7 h
d2 = 33, |$ ]! p2 H/ r0 S% r* X
d3 = 46' h* X- `9 [+ A( k9 H2 [  ~2 G
T1 = 400, z& U7 Z+ B& a
T2 = 378
$ ^- s! v: f3 @& s! t. U- HTo = 28
, G) k& A2 M% N- T  QTe = 31
0 N  ?& q6 H' H7 S* M0 }Tc = 25
  E4 k( G4 N6 H- k""". g" ~' A: t- [7 r3 E! C
# 第2组% `; Y# X( V; q7 Q2 O# L6 H

$ Z( I+ |/ c, u5 Ld1 = 23# i" m- N3 ^9 s
d2 = 41, E4 N$ U- `0 ^$ g4 M& v
d3 = 59, ?( }1 H$ u7 G+ @  M) @& e5 f
T1 = 280
5 N& G5 x0 r4 RT2 = 500/ J/ c" Y0 i* [. i# s
To = 30( x  c. t: [2 s8 O- `+ m
Te = 354 g3 d3 o) R) i& Q
Tc = 30
& S. b/ ?. `* D/ a: ]4 i* w5 `3 R! p$ M
% N" _( e. D8 _+ X' S( o1 Y3 Q# l. g
# 第3组
3 h9 a8 w. T# h, r$ v: h5 p
" @7 u% B- H( j"""
0 F: q7 z7 f4 |( B4 ~( e2 _( jd1 = 18, N8 t1 T7 z- t+ {* O# i
d2 = 32
, }) w! N  ^* U, [d3 = 464 s% L% q8 I5 J4 q9 `, n' J
T1 = 455! J7 C/ O: y$ \0 b2 e4 g& v
T2 = 182
; M, n) b. u' U$ L8 F  m: [' VTo = 27
) R2 D6 t4 J; G$ l# N7 k& h1 J7 hTe = 32
# ~! @/ a, f8 K/ o" y; `Tc = 25
8 C) M  P/ Q5 m, Z/ S( O$ I"""
5 d& |3 @5 e' S  e* L, S1 A( R& I/ x
cncT = [To,Te,To,Te,To,Te,To,Te]
: Q( e4 y  e8 E2 xtm = [: ~) ]8 g5 m" A( {5 u  y( N
[0,0,d1,d1,d2,d2,d3,d3],( z/ d( [  E- T2 k
[0,0,d1,d1,d2,d2,d3,d3],
) r4 ^4 N/ i7 `" c [d1,d1,0,0,d1,d1,d2,d2],; X' l5 P- \7 |6 L
[d1,d1,0,0,d1,d1,d2,d2],! y" c) m- S0 P3 M4 [2 @8 R3 k5 l! O
[d2,d2,d1,d1,0,0,d1,d1],0 J: c0 R7 s! P- `( b
[d2,d2,d1,d1,0,0,d1,d1],
: a1 w9 Y3 Z( D( i, k [d3,d3,d2,d2,d1,d1,0,0],
[d3,d3,d2,d2,d1,d1,0,0],6 M+ F+ M! |/ H* J
]
# v# D' M* `0 g1 W+ {Type = [0,1,0,1,1,1,0,1]    # CNC刀具分类
' U% V) T# w+ n' x: g
! W$ H/ x+ q. H/ {; \3 v" {A = []    # 储存第一道工序的CNC编号
* A8 V' u' a. `! O. ?* \B = []    # 储存第二道工序的CNC编号2 J. }$ n. E" A% U9 t/ b, J
for i in range(len(Type)):
: G9 |2 {7 m2 D5 j if Type:- ^* E5 Q' r$ @# g2 Z% |
B.append(i)
6 [. v0 L1 G$ c2 n: v9 L else:
2 p, O* J  i& T  V- B. ]5 u$ o A.append(i)
) I  T# u! B( y; x, }! a4 T( K- M. u  ^3 ^- m) c7 E  X
def init_first_round():    # 第一圈初始化（默认把所有第一道CNC按顺序加满再回到当前位置全部加满）
" P2 y9 C3 j  R state = [0 for i in range(8)]         # 记录CNC状态（还剩多少秒结束，0表示空闲）
' z5 V; Q9 k0 s4 R* c% n# j isEmpty = [1 for i in range(8)]    # CNC是否为空
' P+ T) n( b9 T2 X log = [0 for i in range(8)]    # 记录每台CNC正在加工第几件物料
1 t% G3 x2 s+ G count1 = 0
* P; o9 Q4 F6 l rgv = 0    # rgv状态（0表示空车，1表示载着半成品）. k7 H! z2 W) u) V
currP = 0
5 j! M5 Y& a: J total = 0
; j4 [# U8 R$ h& ~9 s% y7 H seq = []
! B. x  x! y7 F" @ flag = False
0 B7 x+ _4 K9 b for i in range(len(Type)):
9 r- N; }5 i8 C: a if Type==0:
0 d* {- z" P' Q3 _. n, P8 n seq.append(i)0 X4 F+ x# G9 ]% B/ j
flag = True8 z  _# l& U! {2 j# k3 \
currP = seq[0]/ u" b+ J; Y) P0 H+ y/ ~
seq.append(currP)
  u- S4 H9 g+ b$ p$ P* r' i count1,rgv,currP,total = simulate(seq,state,isEmpty,log,count1,rgv,currP,total); Y: F* z" p1 N9 K& _
return state,isEmpty,log,count1,rgv,currP,total,seq! ~$ q' S9 @: q* e  K1 o( v

3 f4 K5 X/ J- {8 q2 Kdef update(state,t):6 b3 I  ^( t. O8 m" b
for i in range(len(state)):% K2 Y+ `, C" \- C0 F/ ?
if state < t:
' g9 R$ d4 b' y% S7 _6 g9 S state = 0- y8 d9 u  |* a8 m8 `& Q# T! p
else:4 _# o+ d: l$ Q: T
state -= t
! c4 |$ @! f) Z  I! p: H* h! Q9 V: L$ M
def simulate(seq,state,isEmpty,log,count1,rgv,currP,total,fpath="log.txt"): # 给定了一个序列模拟它的过程以及返回结果（主要用于模拟并记录）
- l- I  _9 m8 Y1 Z6 E index = 0
8 N% J8 T3 j2 t$ h$ J, H# j temp = 08 l9 U& e0 s6 i. a' n3 E3 @! t
pro1 = {}    # 第一道工序的上下料开始时间
* y1 c- c. u7 J5 m, U0 p* i' F pro2 = {}    # 第二道工序的上下料开始时间
( L4 `" [$ F5 n f = open(fpath,"a")- r/ A" z! c2 Y1 j8 M7 f* C
while index<len(seq):' p9 K% \$ n6 V. u4 H
print(isEmpty)
  L/ I( T$ X% M" d, l nextP = seq[index]
& O- C7 i& q- R# U4 @$ p/ Y t = tm[currP][nextP]' |, p% T) L; ~/ F) I9 S- N
total += t' @5 f- `7 d- n. S3 R# e# y8 [8 J! E
update(state,t)& g' R. y  q7 q% ^) k
if Type[nextP]==0:    # 如果下一个位置是第一道工作点
: m$ m% \6 ?) r: [' T count1 += 1# y9 U% p+ C# e; ]- _* L$ U
if isEmpty[nextP]:    # 如果下一个位置是空的
5 W. I/ T  v0 {5 S7 d0 y1 p f.write("第{}个物料的工序一上料开始时间为{}\tCNC编号为{}号\n".format(count1,total,nextP+1)). u: \% F4 H  p7 l* W' X) S
t = cncT[nextP]
; i% I4 A$ T8 ^5 X) s( \9 w) O$ r% _ total += t5 G0 Q$ s$ P; t! A3 E0 j8 R
update(state,t)( f. H( g8 ~5 g% w7 L
state[nextP] = T1    # 更新当前的CNC状态
$ `1 \  B7 e8 L- o isEmpty[nextP] = 0    # 就不空闲了0 @  f- E. ^0 ]9 g, g
else:    # 如果没有空闲6 C5 G9 u: h$ [- S) r
if state[nextP] > 0:    # 如果还在工作就等待结束
5 ~3 a* @3 Z1 U2 i+ s t = state[nextP]! T) s. T/ C* Q3 H9 S0 r
total += t* o1 `: r% b8 D: f; K9 Q
update(state,t)
8 A9 R) G$ x) N f.write("第{}个物料的工序一下料开始时间为{}\tCNC编号为{}号\n".format(log[nextP],total,nextP+1))" G7 u8 c& c/ Z9 e5 H& g- r
f.write("第{}个物料的工序一上料开始时间为{}\tCNC编号为{}号\n".format(count1,total,nextP+1)): o! U' f( i( L( |# y. d5 z1 m
t = cncT[nextP]    # 完成一次上下料0 X5 L5 W+ B$ I3 l% y$ h
total += t# l; q% m  G- B; m! h! P5 I1 k: \
update(state,t)4 @/ i8 z2 ~. Z% t" R2 M
state[nextP] = T1
* Q7 h. d& i  c% r0 B0 N. t9 B rgv = log[nextP]
  b% D) D4 c3 `& j log[nextP] = count19 A0 Y- B2 h2 ~+ ^1 s. B2 G% r
else:    # 如果下一个位置是第二道工作点
+ `) a: G  H- y# ?- _ if isEmpty[nextP]:    # 如果下一个位置是空的1 `# F! T( {( p" Q8 l) B0 I
f.write("第{}个物料的工序二上料开始时间为{}\tCNC编号为{}号\n".format(rgv,total,nextP+1))4 B3 W4 ~( U7 A
t = cncT[nextP], ]$ E4 v1 M. _; i* Y
total += t  g; e, I/ T; g+ }6 n5 M# p% W- `, h
update(state,t). j+ q7 l" L+ `, j# R1 {
state[nextP] = T2
0 r  w7 y# v. {5 m# K% e5 y isEmpty[nextP] = 0 ' T# Y7 P" U9 L, `( P7 B
else:    # 如果没有空闲  t  W* I! M% @  O
f.write("第{}个物料的工序二下料开始时间为{}\tCNC编号为{}号\n".format(log[nextP],total,nextP+1))
) h" v2 p, ?2 s- i2 ~! { f.write("第{}个物料的工序二上料开始时间为{}\tCNC编号为{}号\n".format(rgv,total,nextP+1))7 s9 m( }: m# }& t$ h
if state[nextP] > 0:    # 如果还在工作就等待结束
& x  L: f8 [- Y- {( T8 V t = state[nextP]! Y% I; r4 [  K1 L+ r9 ^/ a
total += t
) C/ P' ^9 S$ }3 c1 J" P update(state,t)
! \+ v" M* Z! k- I( h+ W6 k t = cncT[nextP]+Tc; Y! \% f) w9 |0 j! ~9 d
total += t
) v1 h! W! h  z3 J/ m) u update(state,t), r% g8 C' [: G: t1 z! E
state[nextP] = T26 S( Q- I3 s6 U* t$ N. u6 Y
log[nextP] = rgv
5 j+ c/ y% g" p2 X rgv = 08 u9 p2 M  z. V3 S9 N, Q* G
currP = nextP
3 N0 W3 H, H- e% H8 K. j8 C: @ temp = total
! E2 ^' A6 a/ u0 A8 H5 p index += 1
* z# |, z& w5 a7 W0 z- N1 _: R+ b f.close()
5 W& ~; S( l( E0 D5 y total += tm[currP][Type.index(0)]    # 最后归到起始点  b& l9 q* h$ e/ Y( s1 {$ ^9 J% M
return count1,rgv,currP,total, K4 g# `+ I! a% X: s* U5 U

$ e. T9 U9 T' M( ?" edef time_calc(seq,state,isEmpty,rgv,currP,total):    # 主要用于记录时间
* |' v9 E) g* [, i index = 06 N4 E% T. K- _
temp = 0
0 M2 e2 a4 G% }  B while index<len(seq):
: k1 D, |8 {- h3 W9 \/ u* ` nextP = seq[index]
7 R1 L# \0 c& }9 @1 o/ c/ h& g# l t = tm[currP][nextP]
3 q: x; G* C1 r* E total += t- ^9 B4 G. r( f% y+ d4 E
update(state,t)
$ E8 x7 y# P$ ~! C) L+ T* ? if Type[nextP]==0:    # 如果下一个位置是第一道工作点
$ {9 A& T, v- W if rgv==1:    # 然而载着半成品/ F  B. A0 ^% J
seq.pop(index)    # 去掉这个元素并中止当次循环进入下一个循环
2 n* }& a* v( ]: F9 Q6 H- V continue
$ Z% q, g! q9 |# x if isEmpty[nextP]:    # 如果下一个位置是空的0 e2 Y7 o1 f3 g; A3 {
t = cncT[nextP]
, v  U( P4 c/ K total += t+ K1 e( V" N5 `0 c! q* b6 d
update(state,t)
8 {& I5 l$ O/ X state[nextP] = T1    # 更新当前的CNC状态3 m4 t' G+ ?/ y8 h
isEmpty[nextP] = 0    # 就不空闲了3 J7 p0 L/ O9 Q) i0 X) m8 K
else:    # 如果没有空闲
& M: u, _4 J, W# w, }8 i) C  S if state[nextP] > 0:    # 如果还在工作就等待结束
% r3 ?6 N8 X) v0 A4 X t = state[nextP], L1 o( [$ v+ D2 c# ^% T
total += t. @. x6 Z) e. R1 c% M% J( d9 \
update(state,t)
% |' b/ u  [" E' D/ `$ t t = cncT[nextP]    # 完成一次上下料% Z( z4 Q5 M! y* C2 {( R2 `
total += t
% o/ ?3 w! }! D4 q3 f9 O  l update(state,t)% J) I! l" M- H) m0 A
state[nextP] = T1
$ c/ z( s+ W4 R! v+ E rgv = 1( Z6 W6 J) E; E: {
else:    # 如果下一个位置是第二道工作点
7 S) ?9 G: ^: \$ p5 W if rgv==0:    # 如果是个空车/ _( {( M; D$ a: o4 x+ c+ i
seq.pop(index)    # 删除当前节点
* k$ G0 E+ ]' W1 Q2 Q3 W continue
4 I; n# ^: T3 {6 i* y5 t if isEmpty[nextP]:    # 如果下一个位置是空的6 k- A+ y# i; V/ R2 \1 _
t = cncT[nextP]
1 [/ Z5 R+ A4 X% R" V total += t0 s$ B& E5 k4 Z
update(state,t)
: T: u9 [' F4 Q. d& ^  Y4 U state[nextP] = T2
3 Q+ ~; O3 T- O0 N# }1 {9 Z isEmpty[nextP] = 0 . @! }% _& X3 {' z0 B
else:    # 如果没有空闲" p1 f  i5 g+ F3 U% n8 m; z
if state[nextP] > 0:    # 如果还在工作就等待结束
6 _) Q2 ~' H: M t = state[nextP]
9 l. E4 u& z4 B total += t1 J, g+ L4 L0 w& t
update(state,t)6 S- Q% X& B9 Y: |7 d/ n. n
t = cncT[nextP]+Tc
, n) y2 n& D0 Y7 L" Y. w7 r total += t) n! Y# v: {- _
update(state,t)
8 M( o7 _+ z4 R% U! g: b state[nextP] = T2" C8 R7 z; f7 D
rgv = 04 j! ^  n% f2 J% p3 W
currP = nextP
( ^4 ?$ ?( B1 D temp = total ' p7 X# C& S4 _* H
index += 1
& E2 j2 k! z2 t return rgv,currP,total
& \: T5 C$ Y7 a+ q% I1 M6 A$ n, e4 m+ K
def forward1(state,isEmpty,currP):    # 一步最优6 C2 y0 Z1 ^% k0 e
lists = []
( q/ a: ~4 f: B if currP in A:
; b: E. Q3 J# l) m+ ^- C; ?+ D6 u rgv = 1
$ w( ~7 ~) x8 J& X7 z3 g8 Y6 W) _ for e1 in B:
( u# ]6 i5 L9 Z6 n3 W$ y lists.append([e1])+ R$ ]; V9 M5 x# b' q
) l! x6 D1 t9 V) t9 [2 v
else:; K! b5 }: z  k* Z$ B& m
rgv = 0
& C6 W' R! I# s7 Q! |- y8 [, x for e1 in A:4 Q5 c( R8 F% f+ R/ |  B
lists.append([e1])
5 X' Z' z  K4 K
4 ~$ K/ \/ P5 i5 _7 h. J1 h minV = 288006 [7 d# }5 J2 I( b
for i in range(len(lists)):
% b" {2 |% `# X( x2 l) O: n8 Q$ c t = time_calc(lists,state[:],isEmpty[:],rgv,currP,0)[-1]
$ P0 Y8 y5 T) Z  {9 K if t<minV:% M- h& P& q/ S" U$ m
minV = t1 g# r, k) T! K
index = i1 p9 A/ g5 F9 j$ r, V
return lists[index][0]
" Z! j; g4 J) \5 s0 j* x
9 ?. B, ]# R* Mdef forward4(state,isEmpty,currP):    # 四步最优1 P0 |# D4 I9 }! \
lists = []
/ V: r$ \4 l% l; ] """ 遍历所有的可能性 """
$ @* y- t, f1 [ if currP in A:    # 如果当前在第二道工序CNC的位置7 `- T# K( d( O% P0 M1 U& W
rgv = 1
1 ^( L. l5 l  y) q! c for e1 in B:
; h) z/ I+ {7 _: g3 D for e2 in A:- \$ s6 ]6 a9 A' s( [5 n
for e3 in B:/ }4 C: ]7 n3 H$ t9 i; y
for e4 in A:2 ?# ]. ]4 j+ E' I! _1 y2 e
lists.append([e1,e2,e3,e4])
8 t5 _( V  w2 G; N; v else:0 U* [0 |- M4 c" a0 c
rgv = 0
3 a6 m! z5 w& @: p' h$ S for e1 in A:4 n. l( }8 `& k" v- M, g
for e2 in B:8 a$ |4 c) |4 y) v
for e3 in A:% S) p* V2 W& h3 b4 Z  r
for e4 in B:
+ K) q# ?9 U! u2 j" K" K lists.append([e1,e2,e3,e4])
$ x8 Z0 w2 k* A0 x, z minV = 28800' X0 ?+ `+ l) s1 Y3 O
for i in range(len(lists)):- ~2 d5 l& n1 c/ l# v
t = time_calc(lists,state[:],isEmpty[:],rgv,currP,0)[-1]  B; @7 b0 C  f
if t<minV:
# l- y4 y6 H# N5 J3 Z minV = t
9 b1 f! U8 n$ c- c) ]! s" I index = i
( F6 `* h6 i, ^ return lists[index][0]    # 给定下一步的4步计算最优5 K! F5 z0 e% P/ b) h. Y! w
$ U8 s# `: |, R: c8 Y; d
def forward5(state,isEmpty,currP):    # 五步最优
9 o) F4 f4 o2 w5 e9 x lists = []/ J. q* N2 d- ^0 ?! U  o- S
""" 遍历所有的可能性 """" j4 Z; }$ Z4 F
if currP in A:    # 如果当前在第二道工序CNC的位置& A% c0 _2 p% N2 c
rgv = 1
; a5 J9 v0 Y( M2 l for e1 in B:/ o4 A/ i/ o& J
for e2 in A:% h4 @' m4 Y9 ^5 h" Y
for e3 in B:4 q5 [7 E. h' r" o, a
for e4 in A:
9 \& U! g6 r# P& {6 I' w for e5 in B:
' ^# ^2 S3 Y9 _( V% T7 c, Z7 } lists.append([e1,e2,e3,e4,e5])
5 T& _5 r0 }# Q5 j else:
1 \9 p2 b3 }! ~6 W8 P4 S& U rgv = 0
& [, u% o: x3 n for e1 in A:
  n1 N& |2 Y  E0 E/ _) p4 {7 W for e2 in B:( D  g/ ?2 P4 q
for e3 in A:
/ P# ~/ q0 F' X: I8 K$ r for e4 in B:
& L3 l4 l1 U0 p for e5 in A:" q4 y4 ]3 y8 y  x$ E5 n. [5 A
lists.append([e1,e2,e3,e4,e5]); q- S! U' l! H* f
minV = 28800; k2 X1 P9 c. M
for i in range(len(lists)):
, g: V, U4 j# O2 v t = time_calc(lists,state[:],isEmpty[:],rgv,currP,0)[-1]/ n) E& B: a5 A/ O! R
if t<minV:
5 V9 O6 D( J2 V0 r  j minV = t
! b% w6 y& c$ W index = i
, y! S, l6 I1 z+ ^1 T4 F5 e return lists[index][0]    # 给定下一步的5步计算最优3 c0 D, i) [- R! v4 g1 `4 i

# z! T% N9 U1 \  A; @, K& ?  qdef forward6(state,isEmpty,currP):    # 六步最优. J7 j. K: j8 T: W/ K* M/ w' k
lists = [], F# G4 c, F6 k6 p
""" 遍历所有的可能性 """7 f% K6 C. R) l+ @: ^3 I% W! i. u! Q
if currP in A:    # 如果当前在第二道工序CNC的位置
3 p2 m3 f  [9 }7 F; s. ]" r rgv = 1) H7 _& O7 g9 y2 x
for e1 in B:
6 P7 q* |; o' q6 v: E) L for e2 in A:
7 a5 z2 T  F6 B& F8 Y for e3 in B:+ ?0 H% O* `( l5 v5 W. |
for e4 in A:
: u2 ?% V9 f8 X for e5 in B:2 i. q6 I6 D$ @2 F. i0 \$ x
for e6 in A:
" h: A/ W+ l1 U9 H+ O lists.append([e1,e2,e3,e4,e5,e6])& d1 o! `7 N5 k( f4 }
else:4 n) t( Y; e# [' q/ s
rgv = 0
7 s# |" L9 A; C/ W# { for e1 in A:
. L; O8 A8 W( k" M. I for e2 in B:
$ w$ k8 g( e* V7 E7 v for e3 in A:8 }) s4 U9 \- _1 y0 Q
for e4 in B:
- U4 o! M6 A2 y for e5 in A:0 x% s5 V; i' j# K. y
for e6 in B:
2 B5 u" j5 h8 v% |9 \- d3 R lists.append([e1,e2,e3,e4,e5,e6])
, f' n6 c9 P! K5 z minV = 288003 c  O! F: _) C) J3 S
for i in range(len(lists)):
+ [& C: ?8 r- A+ w) E* M* } t = time_calc(lists,state[:],isEmpty[:],rgv,currP,0)[-1]
2 G- K% U. ]8 m7 T" O3 p if t<minV:  Y0 H: y( G5 H  P% u
minV = t# A, h3 Y9 j1 ~. E9 j0 o
index = i* ^/ e6 O3 B* S$ m
return lists[index][0]    # 给定下一步的6步计算最优
9 N9 j; T" C$ V* E  p0 x" ]# J
7 [" B4 d! J( n. v) [& N, d) Z& Udef forward7(state,isEmpty,currP):    # 七步最优. ^7 \1 V& o6 K5 X6 @, a( e) d
lists = []
# j  N) |' F5 K% k- K6 I1 }7 o  w """ 遍历所有的可能性 """
$ M  n: C* ^5 K7 ^. F if currP in A:    # 如果当前在第二道工序CNC的位置: Z- I4 T6 A$ V1 u0 \# [: P
rgv = 19 _) F7 i* l8 x& J
for e1 in B:
9 B5 q2 W: \0 }2 `) Y, G( [ for e2 in A:
/ w, U0 c% ~8 B% R for e3 in B:; x# Z, s3 N! T) s* o% v1 Y% j
for e4 in A:+ O, M( b8 v, H7 v7 w
for e5 in B:
: `* l3 Q$ l2 ] for e6 in A:
+ V1 F3 w5 \) `0 q for e7 in B:- x# D/ f  G/ O( U
lists.append([e1,e2,e3,e4,e5,e6,e7])
& J$ b: r& r8 z6 [" Y; A else:
# \3 l4 ]" n* H7 H, z4 D rgv = 0
- Q5 T' V) w, H: f4 i* ^4 c; P9 D for e1 in A:. h- a' {2 K: A/ }% T- J
for e2 in B:) o0 y# [! E& G1 i1 A3 t! e& `7 V
for e3 in A:4 W* `+ Z! `( k- G$ {7 f5 y
for e4 in B:5 u( H& e6 m' S5 h: a
for e5 in A:
6 ?, ^. [- ]' Y4 f9 o, J for e6 in B:0 t8 p' N5 ?3 D: b
for e7 in A:
- P: A' h0 a; | lists.append([e1,e2,e3,e4,e5,e6,e7])* w8 ~8 i0 P& i
minV = 28800% B* G4 ^9 j7 e& F4 s8 B+ `, U$ i, G
for i in range(len(lists)):
/ O7 u- e7 O% s/ b1 ] t = time_calc(lists,state[:],isEmpty[:],rgv,currP,0)[-1]
2 S$ \2 _. i% B  H+ |" Z# D7 B if t<minV:
' I2 ?3 \" E3 _+ b% x1 x- p minV = t% j/ i4 Y! M0 i8 Q* k
index = i
. c/ C& |1 I$ {- I2 C& g return lists[index][0]    # 给定下一步的7步计算最优, B" A: ~* B+ g1 `' O

8 ^  E+ t6 M6 Z. hdef forward8(state,isEmpty,currP):    # 八步最优; _; ^4 p( X( D
lists = []
6 L0 v* K# C0 D$ n """ 遍历所有的可能性 """* o$ ], |3 q7 ]4 ^$ W5 _
if currP in A:    # 如果当前在第二道工序CNC的位置7 S5 K9 g- M- Z' u4 ^  L* V
rgv = 1
' ]% N# R2 M' R, c& k" \$ q for e1 in B:
7 @  r- \& }9 P. T6 Y$ G# m; ? for e2 in A:; w2 N+ ~& p2 N$ U5 T& C. B' h( X
for e3 in B:! E' l) U( S' P& y5 A  Z) W, z' |
for e4 in A:
- |* ]3 b; b% i% _ for e5 in B:
, Z5 G, ?  u1 y( x for e6 in A:
) |* Q. h0 g" i( _% I for e7 in B:& n6 D9 J. C. T1 b/ O! b) M7 |/ Z
for e8 in A:8 x6 e7 A$ V. p5 {4 e; B$ V4 h' |
lists.append([e1,e2,e3,e4,e5,e6,e7,e8])& P/ L$ _4 Q4 n) q+ _' H' y6 L: ?
else:
4 p3 E5 U0 f+ L: k7 K( L7 A4 B$ Z rgv = 09 R4 i; r0 L% H/ j% U
for e1 in A:, q1 C3 `0 p) k8 ~4 G
for e2 in B:9 U' C) {0 N& ^* h
for e3 in A:8 s8 G8 j8 L( L- u
for e4 in B:
9 M* ~  z* i! `) X, L for e5 in A:1 _3 ]( I  G6 E: p
for e6 in B:$ ~( q9 S- e" v
for e7 in A:
3 M! S! X/ i0 [$ L$ r* N# } for e8 in B:+ g4 g& f, O, Q! t% `4 e
lists.append([e1,e2,e3,e4,e5,e6,e7,e8])! T* `5 x' l4 u7 ?
minV = 288009 L2 ~- N2 ]$ H, A/ D2 u
for i in range(len(lists)):
* P6 q; B8 E- g, C7 |% N. Z. Z t = time_calc(lists,state[:],isEmpty[:],rgv,currP,0)[-1]
2 E2 s+ m% k7 x! }& `; J9 a; D if t<minV:; a4 m3 o. E) F6 R9 d+ N( N
minV = t
9 o2 \5 p8 L' p" c; z3 w# H index = i
" \; J' f% z( a! \ return lists[index][0]    # 给定下一步的8步计算最优
: C, Z* m9 R8 m6 J
* K8 W5 e7 A2 c/ j0 @4 w* o2 Mdef greedy(state,isEmpty,rgv,currP,total):    # 贪婪算法; A" q% k. P$ a+ u
line = []( t2 I0 m$ C' S) f+ m3 z( |" J
count = 0
2 U. R( {' u5 G! j while True:6 }+ N  j$ L; }) o
#nextP = forward4(state[:],isEmpty[:],currP)
% d9 p! {* g( `( x nextP = forward5(state[:],isEmpty[:],currP)
. D! x2 D7 P" D; g line.append(nextP)
9 y! Z) I# ^( ` rgv,currP,t = time_calc([nextP],state,isEmpty,rgv,currP,0)
- L3 J% g- U9 y" ~2 c2 y& _ total += t
& n* ]* \+ D5 f4 C2 g count += 1
: c3 N$ a3 D1 E# |) A. i- |# _ if total>=28800:
, e/ f1 q" z: R. G break
( y, F: q) l% _+ |. \7 H return line
1 ?* q. o! c. B" m
! R' F0 Q) O6 J8 Eif __name__ == "__main__":
+ L+ s6 X/ M% w' r) I state,isEmpty,log,count1,rgv,currP,total,seq = init_first_round()2 [, e5 R5 ?8 Z& |; v9 O* X
print(state,isEmpty,log,count1,rgv,currP,total,seq)$ I# y# K, v. o0 @% M' Z
line = greedy(state[:],isEmpty[:],rgv,currP,total)% Q( r( W. a, X
simulate(line,state,isEmpty,log,count1,rgv,currP,total)
3 ?) U- D0 n3 V' ?/ V 5 `, b' S, w$ F( T, U* x
write_xlsx()0 x0 q# c) Z# n* U' K+ s( l
后记5 T% t: K+ \+ Q9 O7 j
6 P+ z! T$ |+ T3 N* f: M% I9 R
这次博客有点赶，所以质量有点差，很多点没有具体说清楚。主要最近事情比较多。本来也没想写这篇博客，但是觉得人还是要善始善终，虽然没有人来阅读，但是学习的路上还是要多做小结，另外也是万一有需要的朋友也可以给一些参考。虽然我的水平很差劲，但是我希望能够通过交流学习提高更多人包括我自己的水平。不喜勿喷！
. \# f; S$ q+ ~& R* N6 d--------------------- : m4 W! O# b! o8 v8 l) ^& G; T
( S3 {, k8 K) I
& `' u) }% Y5 P4 s$ e1 d; V$ u0 R- v
8 \# j1 p4 ]8 a1 U2 v$ b
* q% h7 X  S7 O& v* @
1 |9 o6 a7 J# Y- T. ]

  `7 ~2 G4 T' L  X6 T5 B4 S
4 g: U  ~  e: H+ {  |7 w# s$ i. z
2 t- P5 J( a( {) y" d8 \
0 ~/ K( M- l: }% o+ u' I- m* a, H