fix example

epinowcast · Feb 17, 2025 · 7058bd0 · 7058bd0
1 parent 3573214
commit 7058bd0
Show file tree

Hide file tree

Showing 2 changed files with 18 additions and 15 deletions.
diff --git a/R/estimate_uncertainty.R b/R/estimate_uncertainty.R
@@ -27,6 +27,7 @@
 #' @examples
 #' triangle <- matrix(
 #'   c(
+#'     65, 46, 21, 7,
 #'     70, 40, 20, 5,
 #'     80, 50, 10, 10,
 #'     100, 40, 31, 20,
@@ -52,7 +53,7 @@
 #' disp_params <- estimate_uncertainty(
 #'   triangle_for_uncertainty = triangle,
 #'   n_history_dispersion = 2,
-#'   n_history = 3
+#'   n_history = 4
 #' )
 estimate_uncertainty <- function(triangle_for_uncertainty,
                                  delay_pmf = NULL,

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