powered by
Computes characteristic time scales corresponding to exponential growth rates.
timescale(r, units)
1/r, as a difftime if units is not missing.
1/r
difftime
units
a non-negative numeric vector listing exponential growth rates.
a character string indicating units for the result. If missing, then the result is “unitless”.
R0, finalsize.
R0
finalsize
r <- 10^(-2:0) units <- "days" stopifnot(all.equal(timescale(r), 1 / r), all.equal(timescale(r, units), .difftime(1 / r, units)))
Run the code above in your browser using DataLab