diff --git a/R/epiparameter.R b/R/epiparameter.R index 61d4597c8..9dd2031cc 100644 --- a/R/epiparameter.R +++ b/R/epiparameter.R @@ -516,8 +516,10 @@ is_epiparameter <- function(x) { #' ep <- epiparameter( #' disease = "ebola", #' epi_dist = "incubation_period", -#' prob_distribution = "gamma", -#' prob_distribution_params = c(shape = 1, scale = 1) +#' prob_distribution = create_prob_distribution( +#' prob_distribution = "gamma", +#' prob_distribution_params = c(shape = 1, scale = 1) +#' ) #' ) #' #' # example of each distribution method for an `epiparameter` object diff --git a/man/epiparameter_distribution_functions.Rd b/man/epiparameter_distribution_functions.Rd index 89b5c3296..d2c4e06c9 100644 --- a/man/epiparameter_distribution_functions.Rd +++ b/man/epiparameter_distribution_functions.Rd @@ -46,8 +46,10 @@ functions. These operate on any distribution that can be included in an ep <- epiparameter( disease = "ebola", epi_dist = "incubation_period", - prob_distribution = "gamma", - prob_distribution_params = c(shape = 1, scale = 1) + prob_distribution = create_prob_distribution( + prob_distribution = "gamma", + prob_distribution_params = c(shape = 1, scale = 1) + ) ) # example of each distribution method for an `epiparameter` object