change call to default_cdisc_join_keys

insightsengineering · Nov 14, 2023 · 953d892 · 953d892
1 parent a4ada29
commit 953d892
Show file tree

Hide file tree

Showing 14 changed files with 14 additions and 14 deletions.
diff --git 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
@@ -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
@@ -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
@@ -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
@@ -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
@@ -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
@@ -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
diff --git a/man/tm_g_gh_correlationplot.Rd b/man/tm_g_gh_correlationplot.Rd
diff --git a/man/tm_g_gh_density_distribution_plot.Rd b/man/tm_g_gh_density_distribution_plot.Rd
diff --git a/man/tm_g_gh_lineplot.Rd b/man/tm_g_gh_lineplot.Rd
diff --git a/man/tm_g_gh_scatterplot.Rd b/man/tm_g_gh_scatterplot.Rd
diff --git a/man/tm_g_gh_spaghettiplot.Rd b/man/tm_g_gh_spaghettiplot.Rd
diff --git 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,