机器利用率的调度问题

时间:2019-04-05 10:41:52

标签: python r optimization scheduling

我遇到了一个与制造领域有关的独特问题。我的数据如下

sodium_hex2bin()

问题陈述是此数据由要制造的LOT组成。我想要的是通过将他们的空闲时间分配给其他批次LOT2来有效地利用机器。我面临的主要问题是,例如说2号机器在9:15完成工作,因此在9.15我将允许该机器在9:19的LOT2 bt上工作,再次要求2号机器重新回到Lot1。因此,在这种情况下,lot1应该添加由于机器2在LOT2中工作而发生的延迟。

我尝试过计划包,项目包。尝试使用护腿板,但无法解决此独特问题的任何具体结果。任何与此有关的帮助或软件包都将受到赞赏

所需的输出将为

df<- read.table(text="LOT   Step    Tool_code   Time_taken  Transfer_time   START_Time  end_time
LOT1    1   Machine 1   3   1   09:00:00    09:04:00
LOT1    2   Machine 2   10  1   09:04:00    09:15:00
LOT1    3   Machine 3   3   1   09:15:00    09:19:00
LOT1    4   Machine 2   10  1   09:19:00    09:30:00
LOT1    5   Machine 4   2   1   09:30:00    09:33:00
LOT1    6   Machine 5   2   1   09:33:00    09:36:00
LOT1    7   Machine 6   1   1   09:36:00    09:38:00
LOT1    8   Machine 7   5   1   09:38:00    09:44:00
LOT1    9   Machine 8   5   1   09:44:00    09:50:00
",header =T)

并且考虑到LOT1中的机器工作已完成,Lot 2的计时如下

lot1 <- structure(list(LOT = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L), .Label = "LOT1", class = "factor"), Step = 1:9, Tool_code = structure(c(1L, 
2L, 3L, 2L, 4L, 5L, 6L, 7L, 8L), .Label = c("Machine 1", "Machine 2", 
"Machine 3", "Machine 4", "Machine 5", "Machine 6", "Machine 7", 
"Machine 8"), class = "factor"), Time_taken = c(3L, 10L, 3L, 
10L, 2L, 2L, 1L, 5L, 5L), Transfer_time = c(1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L), START_Time = structure(1:9, .Label = c("09:00:00", 
"09:04:00", "09:15:00", "09:19:00", "09:30:00", "09:33:00", "09:36:00", 
"09:38:00", "09:44:00"), class = "factor"), end_time = structure(1:9, .Label = c("09:04:00", 
"09:15:00", "09:19:00", "09:30:00", "09:33:00", "09:36:00", "09:38:00", 
"09:44:00", "09:50:00"), class = "factor"), desired_start_time = structure(1:9, .Label = c("09:00:00", 
"09:04:00", "09:15:00", "09:26:00", "09:37:00", "09:40:00", "09:43:00", 
"09:45:00", "09:51:00"), class = "factor"), desired_end_time = structure(1:9, .Label = c("09:04:00", 
"09:15:00", "09:19:00", "09:37:00", "09:40:00", "09:43:00", "09:45:00", 
"09:51:00", "09:57:00"), class = "factor"), comment = structure(c(1L, 
1L, 1L, 2L, 1L, 1L, 1L, 1L, 1L), .Label = c("", "Delay because machine was working in LOT2"
), class = "factor")), class = "data.frame", row.names = c(NA, 
-9L))

0 个答案:

没有答案