```r # now trajectory() %>% timeout(function() get_attribute(env, "delay")) # proposal trajectory() %>% timeout_from_attribute("delay") ```