diff --git a/R/tm_g_ae_oview.R b/R/tm_g_ae_oview.R index f4fc0fcc..364bbd5c 100644 --- a/R/tm_g_ae_oview.R +++ b/R/tm_g_ae_oview.R @@ -16,7 +16,7 @@ #' @export #' #' @examplesIf require("nestcolor") -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(nestcolor) #' ADSL <- rADSL diff --git a/R/tm_g_ae_sub.R b/R/tm_g_ae_sub.R index f4333a3c..37c7f523 100644 --- a/R/tm_g_ae_sub.R +++ b/R/tm_g_ae_sub.R @@ -18,7 +18,7 @@ #' #' @examples #' # Example using stream (ADaM) dataset -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' ADSL <- rADSL #' ADAE <- rADAE diff --git a/R/tm_g_butterfly.R b/R/tm_g_butterfly.R index 51c84702..8e6e965c 100644 --- a/R/tm_g_butterfly.R +++ b/R/tm_g_butterfly.R @@ -41,7 +41,7 @@ #' #' @examplesIf require("nestcolor") #' # Example using stream (ADaM) dataset -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(dplyr) #' library(nestcolor) diff --git a/R/tm_g_events_term_id.R b/R/tm_g_events_term_id.R index 438a1c41..aac7751f 100644 --- a/R/tm_g_events_term_id.R +++ b/R/tm_g_events_term_id.R @@ -18,7 +18,7 @@ #' @author Molly He (hey59) \email{hey59@gene.com} #' #' @examplesIf require("nestcolor") -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(nestcolor) #' ADSL <- rADSL diff --git a/R/tm_g_heat_bygrade.R b/R/tm_g_heat_bygrade.R index 059386c5..01cc6052 100644 --- a/R/tm_g_heat_bygrade.R +++ b/R/tm_g_heat_bygrade.R @@ -34,7 +34,7 @@ #' @export #' #' @examplesIf require("nestcolor") -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(dplyr) #' library(nestcolor) diff --git a/R/tm_g_patient_profile.R b/R/tm_g_patient_profile.R index c60b5680..dc64b393 100644 --- a/R/tm_g_patient_profile.R +++ b/R/tm_g_patient_profile.R @@ -60,7 +60,7 @@ #' @export #' #' @examplesIf require("nestcolor") -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(nestcolor) #' ADSL <- rADSL diff --git a/R/tm_g_spiderplot.R b/R/tm_g_spiderplot.R index 37722740..8e9238a1 100644 --- a/R/tm_g_spiderplot.R +++ b/R/tm_g_spiderplot.R @@ -26,7 +26,7 @@ #' #' @examplesIf require("nestcolor") #' # Example using stream (ADaM) dataset -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(nestcolor) #' ADSL <- rADSL diff --git a/R/tm_g_swimlane.R b/R/tm_g_swimlane.R index 29bc9808..ff81e2e9 100644 --- a/R/tm_g_swimlane.R +++ b/R/tm_g_swimlane.R @@ -36,7 +36,7 @@ #' #' @examplesIf require("nestcolor") #' # Example using stream (ADaM) dataset -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within(library(dplyr)) |> #' within(library(nestcolor)) |> #' within(ADSL <- rADSL %>% diff --git a/R/tm_g_waterfall.R b/R/tm_g_waterfall.R index 6d04e3c7..04b9a2eb 100644 --- a/R/tm_g_waterfall.R +++ b/R/tm_g_waterfall.R @@ -47,7 +47,7 @@ #' @author houx14 \email{houx14@gene.com} #' #' @examplesIf require("nestcolor") -#' data <- cdisc_data() |> +#' data <- teal_data() |> #' within({ #' library(nestcolor) #' ADSL <- rADSL diff --git a/man/tm_g_ae_oview.Rd b/man/tm_g_ae_oview.Rd index 1e4b4f50..30aede55 100644 --- a/man/tm_g_ae_oview.Rd +++ b/man/tm_g_ae_oview.Rd @@ -51,8 +51,8 @@ the \code{\link[teal:teal_modules]{teal::module()}} object. Display the \code{AE} overview plot as a shiny module } \examples{ -\dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} -data <- cdisc_data() |> +\dontshow{if (requireNamespace("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} +data <- teal_data() |> within({ library(nestcolor) ADSL <- rADSL diff --git a/man/tm_g_ae_sub.Rd b/man/tm_g_ae_sub.Rd index 925ef6d0..06b4cc4c 100644 --- a/man/tm_g_ae_sub.Rd +++ b/man/tm_g_ae_sub.Rd @@ -50,7 +50,7 @@ Display the \code{AE} by subgroups plot as a teal module } \examples{ # Example using stream (ADaM) dataset -data <- cdisc_data() |> +data <- teal_data() |> within({ ADSL <- rADSL ADAE <- rADAE diff --git a/man/tm_g_butterfly.Rd b/man/tm_g_butterfly.Rd index 36a995f4..1daeeaae 100644 --- a/man/tm_g_butterfly.Rd +++ b/man/tm_g_butterfly.Rd @@ -88,7 +88,7 @@ used directly as filter. \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} # Example using stream (ADaM) dataset -data <- cdisc_data() |> +data <- teal_data() |> within({ library(dplyr) library(nestcolor) diff --git a/man/tm_g_events_term_id.Rd b/man/tm_g_events_term_id.Rd index aa1b5939..fb8141ce 100644 --- a/man/tm_g_events_term_id.Rd +++ b/man/tm_g_events_term_id.Rd @@ -51,7 +51,7 @@ Display Events by Term plot as a shiny module } \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} -data <- cdisc_data() |> +data <- teal_data() |> within({ library(nestcolor) ADSL <- rADSL diff --git a/man/tm_g_heat_bygrade.Rd b/man/tm_g_heat_bygrade.Rd index cb9b3500..5aeb1537 100644 --- a/man/tm_g_heat_bygrade.Rd +++ b/man/tm_g_heat_bygrade.Rd @@ -77,7 +77,7 @@ Display the heatmap by grade as a shiny module } \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} -data <- cdisc_data() |> +data <- teal_data() |> within({ library(dplyr) library(nestcolor) diff --git a/man/tm_g_patient_profile.Rd b/man/tm_g_patient_profile.Rd index 26c18bd7..b86e870a 100644 --- a/man/tm_g_patient_profile.Rd +++ b/man/tm_g_patient_profile.Rd @@ -109,7 +109,7 @@ the start date } \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} -data <- cdisc_data() |> +data <- teal_data() |> within({ library(nestcolor) ADSL <- rADSL diff --git a/man/tm_g_spiderplot.Rd b/man/tm_g_spiderplot.Rd index 53e9ba9e..fa780522 100644 --- a/man/tm_g_spiderplot.Rd +++ b/man/tm_g_spiderplot.Rd @@ -79,7 +79,7 @@ Display spider plot as a shiny module \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} # Example using stream (ADaM) dataset -data <- cdisc_data() |> +data <- teal_data() |> within({ library(nestcolor) ADSL <- rADSL diff --git a/man/tm_g_swimlane.Rd b/man/tm_g_swimlane.Rd index 019b7b54..367bb1b8 100644 --- a/man/tm_g_swimlane.Rd +++ b/man/tm_g_swimlane.Rd @@ -83,7 +83,7 @@ This is teal module that generates a \code{swimlane} plot (bar plot with markers \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} # Example using stream (ADaM) dataset -data <- cdisc_data() |> +data <- teal_data() |> within(library(dplyr)) |> within(library(nestcolor)) |> within(ADSL <- rADSL \%>\% diff --git a/man/tm_g_waterfall.Rd b/man/tm_g_waterfall.Rd index cdb00195..b7b5de12 100644 --- a/man/tm_g_waterfall.Rd +++ b/man/tm_g_waterfall.Rd @@ -101,7 +101,7 @@ This is teal module that generates a waterfall plot for \code{ADaM} data } \examples{ \dontshow{if (require("nestcolor")) (if (getRversion() >= "3.4") withAutoprint else force)(\{ # examplesIf} -data <- cdisc_data() |> +data <- teal_data() |> within({ library(nestcolor) ADSL <- rADSL