-
-
Notifications
You must be signed in to change notification settings - Fork 42
Closed
Labels
Description
From #264, nested clones seem to work just fine; the issue instead has to do with batch cloning:
library(simmer)
t <- trajectory() %>%
log_("started") %>%
batch(3) %>%
clone(n = 2,
trajectory() %>%
timeout(4),
trajectory() %>%
timeout(5)) %>%
synchronize(wait = TRUE) %>%
separate()
simmer() %>%
add_generator("dummy" , t, at(c(5, 10, 20))) %>%
run() %>%
get_mon_arrivals()
#> 5: dummy0: started
#> 10: dummy1: started
#> 20: dummy2: started
#> name start_time end_time activity_time finished replication
#> 1 dummy0 25 25 5 TRUE 1
#> 2 dummy1 25 25 5 TRUE 1
#> 3 dummy2 25 25 5 TRUE 1