使用Simmer包预加载队列

Question

我想在预加载队列的情况下开始慢速模拟。我想模拟一个生产车间中有队列中已有多个作业的一天，然后在白天将更多作业添加到队列中。这是我的工作代码，开始时无需排队。

我该如何预加载具有100个作业的批处理步骤的队列？

library(tidyverse)
library(simmer)
library(simmer.bricks)

numMolds=480
mfgProcess <- simmer()

mfgfloor <-
  trajectory() %>%
    visit("CAD",10) %>% 
    batch(30) %>%
    visit("Printer",15)

mfgProcess %>%
  add_resource("CAD", 6) %>% 
  add_resource("Printer",1) %>% 
  add_generator("job", mfgfloor, function() {c(0, rep(0,numMolds-1), -1)}, mon=2)

mfgProcess %>% run(until=24*60) 

Answer 1

只需在?add_dataframe输入具有自定义服务时间的到达数据框架（请参见t=0），这样，就可以在t=1进行模拟，并从所需的条件开始。