# no delays
delay_opts()
# A single delay that has uncertainty
delay <- LogNormal(
meanlog = Normal(1, 0.2),
sdlog = Normal(0.5, 0.1),
max = 14
)
delay_opts(delay)
# A single delay without uncertainty
delay <- LogNormal(meanlog = 1, sdlog = 0.5, max = 14)
delay_opts(delay)
# Multiple delays (in this case twice the same)
delay_opts(delay + delay)
Run the code above in your browser using DataLab