From 953d892f986592e209a8592c9edc3d1d65b80fad Mon Sep 17 00:00:00 2001 From: unknown Date: Tue, 14 Nov 2023 12:34:22 +0530 Subject: [PATCH] change call to default_cdisc_join_keys --- DESCRIPTION | 2 +- R/tm_g_gh_boxplot.R | 2 +- R/tm_g_gh_correlationplot.R | 2 +- R/tm_g_gh_density_distribution_plot.R | 2 +- R/tm_g_gh_lineplot.R | 2 +- R/tm_g_gh_scatterplot.R | 2 +- R/tm_g_gh_spaghettiplot.R | 2 +- man/tm_g_gh_boxplot.Rd | 2 +- man/tm_g_gh_correlationplot.Rd | 2 +- man/tm_g_gh_density_distribution_plot.Rd | 2 +- man/tm_g_gh_lineplot.Rd | 2 +- man/tm_g_gh_scatterplot.Rd | 2 +- man/tm_g_gh_spaghettiplot.Rd | 2 +- vignettes/teal-goshawk.Rmd | 2 +- 14 files changed, 14 insertions(+), 14 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 5b089549..052f7610 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -55,7 +55,7 @@ Suggests: nestcolor (>= 0.1.0), rmarkdown, stringr, - teal.data (>= 0.3.0), + teal.data (>= 0.3.0.9009), tern (>= 0.7.10), testthat (>= 2.0), utils diff --git a/R/tm_g_gh_boxplot.R b/R/tm_g_gh_boxplot.R index cb53c45b..ed584940 100644 --- a/R/tm_g_gh_boxplot.R +++ b/R/tm_g_gh_boxplot.R @@ -115,7 +115,7 @@ #' datanames <- c("ADSL", "ADLB") #' datanames(data) <- datanames #' -#' join_keys(data) <- cdisc_join_keys(!!!datanames) +#' join_keys(data) <- default_cdisc_join_keys[datanames] #' #' app <- teal::init( #' data = data, diff --git a/R/tm_g_gh_correlationplot.R b/R/tm_g_gh_correlationplot.R index d5fe33a0..3bbe0b4e 100644 --- a/R/tm_g_gh_correlationplot.R +++ b/R/tm_g_gh_correlationplot.R @@ -137,7 +137,7 @@ #' datanames <- c("ADSL", "ADLB") #' datanames(data) <- datanames #' -#' join_keys(data) <- cdisc_join_keys(!!!datanames) +#' join_keys(data) <- default_cdisc_join_keys[datanames] #' #' app <- teal::init( #' data = data, diff --git a/R/tm_g_gh_density_distribution_plot.R b/R/tm_g_gh_density_distribution_plot.R index e92849b6..c5019c01 100644 --- a/R/tm_g_gh_density_distribution_plot.R +++ b/R/tm_g_gh_density_distribution_plot.R @@ -79,7 +79,7 @@ #' #' datanames <- c("ADSL", "ADLB") #' datanames(data) <- datanames -#' join_keys(data) <- cdisc_join_keys(!!!datanames) +#' join_keys(data) <- default_cdisc_join_keys[datanames] #' #' app <- teal::init( #' data = data, diff --git a/R/tm_g_gh_lineplot.R b/R/tm_g_gh_lineplot.R index 70781f35..0cce6394 100644 --- a/R/tm_g_gh_lineplot.R +++ b/R/tm_g_gh_lineplot.R @@ -100,7 +100,7 @@ #' #' datanames <- c("ADSL", "ADLB") #' datanames(data) <- datanames -#' join_keys(data) <- cdisc_join_keys(!!!datanames) +#' join_keys(data) <- default_cdisc_join_keys[datanames] #' #' app <- teal::init( #' data = data, diff --git a/R/tm_g_gh_scatterplot.R b/R/tm_g_gh_scatterplot.R index f2cf80f2..34f65217 100644 --- a/R/tm_g_gh_scatterplot.R +++ b/R/tm_g_gh_scatterplot.R @@ -83,7 +83,7 @@ #' #' datanames <- c("ADSL", "ADLB") #' datanames(data) <- datanames -#' join_keys(data) <- cdisc_join_keys(!!!datanames) +#' join_keys(data) <- default_cdisc_join_keys[datanames] #' #' #' app <- teal::init( diff --git a/R/tm_g_gh_spaghettiplot.R b/R/tm_g_gh_spaghettiplot.R index 4c55a63c..70bcb4bf 100644 --- a/R/tm_g_gh_spaghettiplot.R +++ b/R/tm_g_gh_spaghettiplot.R @@ -119,7 +119,7 @@ #' #' datanames <- c("ADSL", "ADLB") #' datanames(data) <- datanames -#' join_keys(data) <- cdisc_join_keys(!!!datanames) +#' join_keys(data) <- default_cdisc_join_keys[datanames] #' #' app <- teal::init( #' data = data, diff --git a/man/tm_g_gh_boxplot.Rd b/man/tm_g_gh_boxplot.Rd index 32dd9cdd..60a0f540 100644 --- a/man/tm_g_gh_boxplot.Rd +++ b/man/tm_g_gh_boxplot.Rd @@ -173,7 +173,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data) <- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( data = data, diff --git a/man/tm_g_gh_correlationplot.Rd b/man/tm_g_gh_correlationplot.Rd index 155323a0..97fc43da 100644 --- a/man/tm_g_gh_correlationplot.Rd +++ b/man/tm_g_gh_correlationplot.Rd @@ -213,7 +213,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data) <- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( data = data, diff --git a/man/tm_g_gh_density_distribution_plot.Rd b/man/tm_g_gh_density_distribution_plot.Rd index 41e636e5..2880bf9e 100644 --- a/man/tm_g_gh_density_distribution_plot.Rd +++ b/man/tm_g_gh_density_distribution_plot.Rd @@ -128,7 +128,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data) <- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( data = data, diff --git a/man/tm_g_gh_lineplot.Rd b/man/tm_g_gh_lineplot.Rd index 2532eb3b..1c151288 100644 --- a/man/tm_g_gh_lineplot.Rd +++ b/man/tm_g_gh_lineplot.Rd @@ -169,7 +169,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data) <- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( data = data, diff --git a/man/tm_g_gh_scatterplot.Rd b/man/tm_g_gh_scatterplot.Rd index 715e938a..21106306 100644 --- a/man/tm_g_gh_scatterplot.Rd +++ b/man/tm_g_gh_scatterplot.Rd @@ -131,7 +131,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data) <- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( diff --git a/man/tm_g_gh_spaghettiplot.Rd b/man/tm_g_gh_spaghettiplot.Rd index d9c86f3a..102be9e3 100644 --- a/man/tm_g_gh_spaghettiplot.Rd +++ b/man/tm_g_gh_spaghettiplot.Rd @@ -188,7 +188,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data) <- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( data = data, diff --git a/vignettes/teal-goshawk.Rmd b/vignettes/teal-goshawk.Rmd index 2a4b6f6d..56fd8e57 100644 --- a/vignettes/teal-goshawk.Rmd +++ b/vignettes/teal-goshawk.Rmd @@ -75,7 +75,7 @@ data <- within(data, { datanames <- c("ADSL", "ADLB") datanames(data)<- datanames -join_keys(data) <- cdisc_join_keys(!!!datanames) +join_keys(data) <- default_cdisc_join_keys[datanames] app <- teal::init( data = data,