diff --git a/R/tm_g_response.R b/R/tm_g_response.R index 03526eee1..7b3468ba7 100644 --- a/R/tm_g_response.R +++ b/R/tm_g_response.R @@ -37,10 +37,7 @@ #' join_keys(data) <- cdisc_join_keys(!!!datanames) #' #' app <- teal::init( -#' data = teal.data::cdisc_data( -#' teal.data::cdisc_dataset("ADSL", data[["ADSL"]], code = "ADSL <- teal.modules.general::rADSL"), -#' check = TRUE -#' ), +#' data = data, #' modules = teal::modules( #' teal.modules.general::tm_g_response( #' label = "Response Plots", diff --git a/R/tm_t_crosstable.R b/R/tm_t_crosstable.R index b226f101a..aad9250e5 100644 --- a/R/tm_t_crosstable.R +++ b/R/tm_t_crosstable.R @@ -32,10 +32,7 @@ #' join_keys(data) <- cdisc_join_keys(!!!datanames) #' #' app <- teal::init( -#' data = teal.data::cdisc_data( -#' teal.data::cdisc_dataset("ADSL", data[["ADSL"]], code = "ADSL <- teal.modules.general::rADSL"), -#' check = TRUE -#' ), +#' data = data, #' modules = teal::modules( #' teal.modules.general::tm_t_crosstable( #' label = "Cross Table", diff --git a/man/tm_g_response.Rd b/man/tm_g_response.Rd index 4118ef880..decf8de3b 100644 --- a/man/tm_g_response.Rd +++ b/man/tm_g_response.Rd @@ -96,10 +96,7 @@ datanames(data) <- datanames join_keys(data) <- cdisc_join_keys(!!!datanames) app <- teal::init( - data = teal.data::cdisc_data( - teal.data::cdisc_dataset("ADSL", data[["ADSL"]], code = "ADSL <- teal.modules.general::rADSL"), - check = TRUE - ), + data = data, modules = teal::modules( teal.modules.general::tm_g_response( label = "Response Plots", diff --git a/man/tm_t_crosstable.Rd b/man/tm_t_crosstable.Rd index 6379c9589..c9e0ce2b4 100644 --- a/man/tm_t_crosstable.Rd +++ b/man/tm_t_crosstable.Rd @@ -64,10 +64,7 @@ datanames(data) <- datanames join_keys(data) <- cdisc_join_keys(!!!datanames) app <- teal::init( - data = teal.data::cdisc_data( - teal.data::cdisc_dataset("ADSL", data[["ADSL"]], code = "ADSL <- teal.modules.general::rADSL"), - check = TRUE - ), + data = data, modules = teal::modules( teal.modules.general::tm_t_crosstable( label = "Cross Table",