From f2585e112780970ff90126a934ac492bdf3f5554 Mon Sep 17 00:00:00 2001
From: Joshua Lambert <joshua.lambert@lshtm.ac.uk>
Date: Wed, 25 Sep 2024 18:38:33 +0100
Subject: [PATCH] fix epiparameter example

---
 R/epiparameter.R                           | 6 ++++--
 man/epiparameter_distribution_functions.Rd | 6 ++++--
 2 files changed, 8 insertions(+), 4 deletions(-)

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