View source: R/trajectory-activities.R
| timeout | R Documentation | 
Activity for inserting delays and execute user-defined tasks.
timeout(.trj, task, ..., tag)
timeout_from_attribute(.trj, key, ..., tag)
timeout_from_global(.trj, key, ..., tag)
| .trj | the trajectory object. | 
| task | the timeout duration supplied by either passing a numeric or a callable object (a function) which must return a numeric (negative values are automatically coerced to positive). | 
| ... | unused. | 
| tag | activity tag name to perform named rollbacks (see
 | 
| key | the attribute name, or a callable object (a function) which must return the attribute name. | 
Returns the trajectory object.
set_attribute, set_global
set_attribute, set_global
env <- simmer()
traj <- trajectory() %>%
  # static delay
  timeout(3) %>%
  # dynamic, exponential delay
  timeout(function() rexp(1, 10)) %>%
  # dependent on an attribute
  set_attribute("delay", 2) %>%
  set_global("other", function() rexp(1, 2)) %>%
  timeout_from_attribute("delay") %>%
  timeout_from_global("other")
env %>%
  add_generator("dummy", traj, at(0)) %>%
  run() %>%
  get_mon_arrivals()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.