Предварительная загрузка очереди с пакетом simmer - PullRequest
0 голосов
/ 18 апреля 2019

Я хотел бы начать симуляцию с предварительно загруженной очередью. Я хочу смоделировать день на полу mfg с несколькими заданиями, уже находящимися в очереди, а затем в течение дня добавлять в очередь больше заданий. Вот мой рабочий код для начала дня, когда в очереди ничего нет.

Как мне выполнить предварительную загрузку очереди для пакетного шага, скажем, с 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) 

1 Ответ

0 голосов
/ 19 апреля 2019

Просто введите фрейм данных о прибывающих (см. ?add_dataframe) в t=0 с индивидуальным временем обслуживания, чтобы, скажем, в t=1 ваше моделирование началось в нужных вам условиях.

...