r - 使用 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您的模拟在您想要的条件下开始。