chore(plot_year): replace dontrun with donttest in examples

Ref: #206
epiverse-trace · Nov 13, 2024 · 63ddc02 · 63ddc02
1 parent 88bdc89
commit 63ddc02
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 12 deletions.
diff --git a/R/plotting.R b/R/plotting.R
@@ -1063,16 +1063,15 @@ plot_tabla_tipos_event <- function(data_agrupada,
 #' plot_years(data_agrupada,
 #'   col_year = "ano"
 #' )
-#' \dontrun{
+#' \donttest{
+#' if (interactive()) {
 #' data_years <- import_data_event(
 #'   nombre_event = "CHAGAS",
-#'   years = c(2019, 2020),
-#' )
+#'   years = c(2019, 2020))
 #' data_limpia <- limpiar_data_sivigila(data_years)
 #' data_agrupada <- agrupar_years(data_event = data_limpia)
-#' plot_years(data_agrupada,
-#'   col_year = "ano"
-#' )
+#' plot_years(data_agrupada, col_year = "ano")
+#'  }
 #' }
 #' @export
 plot_years <- function(data_agrupada,

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