From 63731526ac5af8f49dab8d844fc187e0e3d78495 Mon Sep 17 00:00:00 2001 From: Robert Devine <> Date: Thu, 18 Apr 2024 18:21:14 -0400 Subject: [PATCH 1/3] Tidying .Rbuildignore removing {pilot1wrappers} references since {pilot3utils} has now been separated successfully in the main assembly core. --- .Rbuildignore | 3 --- 1 file changed, 3 deletions(-) diff --git a/.Rbuildignore b/.Rbuildignore index c2c442b..a467575 100644 --- a/.Rbuildignore +++ b/.Rbuildignore @@ -2,9 +2,6 @@ ^renv\.lock$ ^.*\.Rproj$ ^\.Rproj\.user$ -^pilot1wrappers\.Rcheck$ -^pilot1wrappers.*\.tar\.gz$ -^pilot1wrappers.*\.tgz$ ^_pkgdown\.yml$ ^docs$ ^pkgdown$ From dd89ebc712d85de93d575e5364a4defb88c25d17 Mon Sep 17 00:00:00 2001 From: Robert Devine <> Date: Thu, 18 Apr 2024 18:50:14 -0400 Subject: [PATCH 2/3] Tidying commas_linter in submissions/tlf-efficacy.r - a space is required after a comma. --- submission/programs/tlf-efficacy.r | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/submission/programs/tlf-efficacy.r b/submission/programs/tlf-efficacy.r index d6dbaaf..668f3f9 100644 --- a/submission/programs/tlf-efficacy.r +++ b/submission/programs/tlf-efficacy.r @@ -148,7 +148,7 @@ tbl_1 <- apr0ancova1 %>% ) ) %>% rtf_source( - source = c(paste("Table generated on:", Sys.time()),"Source: [pilot3: adam-adsl; adlbc]"), + source = c(paste("Table generated on:", Sys.time()), "Source: [pilot3: adam-adsl; adlbc]"), text_justification = "c" ) From 5649dd1d451600e8ac387c6b120a4a1c5e9a738e Mon Sep 17 00:00:00 2001 From: Robert Devine <> Date: Thu, 18 Apr 2024 19:13:27 -0400 Subject: [PATCH 3/3] Tidying trailing_whitespace_linter in submissions/tlf-efficacy.r - trailing whitespace is superfluous after %>% command on line 149. --- submission/programs/tlf-efficacy.r | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/submission/programs/tlf-efficacy.r b/submission/programs/tlf-efficacy.r index 668f3f9..9797055 100644 --- a/submission/programs/tlf-efficacy.r +++ b/submission/programs/tlf-efficacy.r @@ -146,7 +146,7 @@ tbl_1 <- apr0ancova1 %>% "{^b} Based on an Analysis of covariance (ANCOVA) model with treatment and baseline value as covariates", "CI = Confidence Interval, LS = Least Squares, SD = Standard Deviation" ) - ) %>% + ) %>% rtf_source( source = c(paste("Table generated on:", Sys.time()), "Source: [pilot3: adam-adsl; adlbc]"), text_justification = "c"