correctly specify uncertainty in epiparameter() example

epiverse-trace · Sep 25, 2024 · 9b197d9 · 9b197d9
1 parent 3c72803
commit 9b197d9
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/R/epiparameter.R b/R/epiparameter.R
@@ -195,7 +195,10 @@ new_epiparameter <- function(disease = character(),
 #'     discretise = FALSE,
 #'     truncation = NA
 #'   ),
-#'   uncertainty = create_uncertainty(),
+#'   uncertainty = list(
+#'     shape = create_uncertainty(),
+#'     scale = create_uncertainty()
+#'   ),
 #'   summary_stats = create_summary_stats(mean = 2, sd = 1),
 #'   citation = create_citation(
 #'     author = person(given = "John", family = "Smith"),

diff --git a/man/epiparameter.Rd b/man/epiparameter.Rd