Generator convenience function to generate arrivals at specific times.

at(...)

Arguments

...

a vector or multiple parameters of times at which to initiate an arrival.

Value

Returns a generator function.

See also

add_generator.

Examples

t0 <- trajectory() %>% timeout(0) simmer() %>% add_generator("dummy", t0, at(0, c(1,10,30), 40, 43)) %>% run(100) %>% get_mon_arrivals()
#> name start_time end_time activity_time finished replication #> 1 dummy0 0 0 0 TRUE 1 #> 2 dummy1 1 1 0 TRUE 1 #> 3 dummy2 10 10 0 TRUE 1 #> 4 dummy3 30 30 0 TRUE 1 #> 5 dummy4 40 40 0 TRUE 1 #> 6 dummy5 43 43 0 TRUE 1