From 8fe5cfb99ce555f4df3bdf9cc608976280d7443b Mon Sep 17 00:00:00 2001 From: Joe Zhu Date: Fri, 17 Jan 2025 00:15:56 +0800 Subject: [PATCH 1/6] vbump to 0.2.3, [skip vbump] --- DESCRIPTION | 6 +++--- NEWS.md | 6 +++++- R/t_dd_slide.R | 12 ++++++------ 3 files changed, 14 insertions(+), 10 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index c5e3f2ba..ec68f84f 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Type: Package Package: autoslider.core Title: Slide Automation for Tables, Listings and Figures -Version: 0.2.2.9003 +Version: 0.2.3 Authors@R: c( person("Joe", "Zhu", , "joe.zhu@roche.com", role = c("cre", "aut"), comment = c(ORCID = "0000-0001-7566-2787")), @@ -57,7 +57,7 @@ Imports: rvg (>= 0.2.5), stringr, survival, - tern (>= 0.9.6.9018), + tern (>= 0.9.7), tidyr, yaml Suggests: @@ -83,7 +83,7 @@ VignetteBuilder: knitr, rmarkdown Remotes: - insightsengineering/tern@main + insightsengineering/tern@1281_cran_0.9.7 Config/Needs/verdepcheck: insightsengineering/formatters, tidyverse/magrittr, mllg/checkmate, rstudio/htmltools, gagolews/stringi, tidymodels/broom, cran/car, tidyverse/dplyr, diff --git a/NEWS.md b/NEWS.md index e85c6626..0e50a6c0 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,4 +1,8 @@ -# autoslider.core 0.2.2.9003 +# autoslider.core 0.2.3 + +### Miscellaneous + + * Align upstream packages (formatters/rtables/rlistings/tern) to the latest releases. # autoslider.core 0.2.2 diff --git a/R/t_dd_slide.R b/R/t_dd_slide.R index c5a70c30..38551bc9 100755 --- a/R/t_dd_slide.R +++ b/R/t_dd_slide.R @@ -32,12 +32,12 @@ t_dd_slide <- function(adsl, lyt <- build_table_header(adsl, arm, split_by_study = split_by_study, side_by_side = side_by_side) lyt <- lyt %>% - count_values( - "DTHFL", - values = "Y", - denom = c("N_col"), - .labels = c(count_fraction = "All Deaths") - ) %>% + # count_values( + # "DTHFL", + # values = "Y", + # denom = c("N_col"), + # .labels = c(count_fraction = "All Deaths") + # ) %>% analyze_vars( vars = "DTHCAT", .stats = "count_fraction", na_str = "", From 3c050143b7c796012b87a79fbbc80a654e3b7ad5 Mon Sep 17 00:00:00 2001 From: Joe Zhu Date: Fri, 17 Jan 2025 10:27:39 +0800 Subject: [PATCH 2/6] update, and check --- DESCRIPTION | 2 +- R/t_dd_slide.R | 12 ++++++------ 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index ec68f84f..44358fc7 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -57,7 +57,7 @@ Imports: rvg (>= 0.2.5), stringr, survival, - tern (>= 0.9.7), + tern (>= 0.9.6.9017), tidyr, yaml Suggests: diff --git a/R/t_dd_slide.R b/R/t_dd_slide.R index 38551bc9..c5a70c30 100755 --- a/R/t_dd_slide.R +++ b/R/t_dd_slide.R @@ -32,12 +32,12 @@ t_dd_slide <- function(adsl, lyt <- build_table_header(adsl, arm, split_by_study = split_by_study, side_by_side = side_by_side) lyt <- lyt %>% - # count_values( - # "DTHFL", - # values = "Y", - # denom = c("N_col"), - # .labels = c(count_fraction = "All Deaths") - # ) %>% + count_values( + "DTHFL", + values = "Y", + denom = c("N_col"), + .labels = c(count_fraction = "All Deaths") + ) %>% analyze_vars( vars = "DTHCAT", .stats = "count_fraction", na_str = "", From 3dc1bf522506eb0001087e61575f9a0b6613b982 Mon Sep 17 00:00:00 2001 From: Joe Zhu Date: Fri, 17 Jan 2025 10:29:34 +0800 Subject: [PATCH 3/6] update wordlist --- inst/WORDLIST | 2 ++ 1 file changed, 2 insertions(+) diff --git a/inst/WORDLIST b/inst/WORDLIST index 558f46b0..f06c181b 100644 --- a/inst/WORDLIST +++ b/inst/WORDLIST @@ -66,6 +66,7 @@ eg expr flextable fontsize +formatters ggplot github headerlines @@ -85,6 +86,7 @@ ppt rds repo reusability +rlistings rtable rtables scaler From f99f60a0d3b5685f16c0a71ee6c72a024537dc4d Mon Sep 17 00:00:00 2001 From: Joe Zhu Date: Fri, 17 Jan 2025 11:49:03 +0800 Subject: [PATCH 4/6] change version --- DESCRIPTION | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 44358fc7..ec68f84f 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -57,7 +57,7 @@ Imports: rvg (>= 0.2.5), stringr, survival, - tern (>= 0.9.6.9017), + tern (>= 0.9.7), tidyr, yaml Suggests: From a529b796d4df27c265246dff56f01ea85a356e4c Mon Sep 17 00:00:00 2001 From: Joe Zhu Date: Fri, 17 Jan 2025 12:46:40 +0800 Subject: [PATCH 5/6] use named variable for label --- R/t_dor_slide.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/t_dor_slide.R b/R/t_dor_slide.R index 1187d900..5f9e3912 100755 --- a/R/t_dor_slide.R +++ b/R/t_dor_slide.R @@ -67,7 +67,7 @@ t_dor_slide <- function(adsl, adtte, arm = "TRT01P", refgroup = NULL) { count_values( vars = "USUBJID", values = unique(adtte$USUBJID), - .labels = "Responders", + .labels = c(count = "Responders"), .stats = "count" ) %>% analyze_vars( From c55547a9be1833bd6d0ed56ffc7885c123d3c8d0 Mon Sep 17 00:00:00 2001 From: Joe Zhu Date: Fri, 17 Jan 2025 16:45:48 +0800 Subject: [PATCH 6/6] update DESCRIPTION --- DESCRIPTION | 2 -- 1 file changed, 2 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index ec68f84f..d26174f0 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -82,8 +82,6 @@ Suggests: VignetteBuilder: knitr, rmarkdown -Remotes: - insightsengineering/tern@1281_cran_0.9.7 Config/Needs/verdepcheck: insightsengineering/formatters, tidyverse/magrittr, mllg/checkmate, rstudio/htmltools, gagolews/stringi, tidymodels/broom, cran/car, tidyverse/dplyr,