diff --git a/R/generate_output.R b/R/generate_output.R index 36be0ce..278ab9b 100755 --- a/R/generate_output.R +++ b/R/generate_output.R @@ -16,7 +16,7 @@ #' #' @export #' -#' @examples +#' @examplesIf require(filters) #' library(dplyr) #' filters::load_filters( #' yaml_file = system.file("filters.yml", package = "autoslider.core"), diff --git a/man/generate_output.Rd b/man/generate_output.Rd index 260c666..8f3f517 100644 --- a/man/generate_output.Rd +++ b/man/generate_output.Rd @@ -30,6 +30,7 @@ By default, `2` will show all filter messages and show output generation message `0` will display no message. } \examples{ +\dontshow{if (require(filters)) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} library(dplyr) filters::load_filters( yaml_file = system.file("filters.yml", package = "autoslider.core"), @@ -44,7 +45,7 @@ data <- list( adae = eg_adae ) generate_output("t_ae_slide", data, spec$t_ae_slide_SE) - +\dontshow{\}) # examplesIf} } \author{ Liming Li (`Lil128`)