remove white spaces

pharmaverse · Jun 18, 2024 · a0bab7f · a0bab7f
1 parent fd1f60f
commit a0bab7f
Show file tree

Hide file tree

Showing 3 changed files with 1 addition and 4 deletions.
diff --git a/R/assign_datetime.R b/R/assign_datetime.R
@@ -159,7 +159,6 @@ assign_datetime <-
            raw_unk = c("UN", "UNK"),
            id_vars = oak_id_vars(),
            .warn = TRUE) {
-
     admiraldev::assert_character_vector(raw_var)
     admiraldev::assert_character_scalar(tgt_var)
     admiraldev::assert_character_vector(id_vars)

diff --git a/R/hardcode.R b/R/hardcode.R
@@ -44,7 +44,6 @@ sdtm_hardcode <- function(tgt_dat = NULL,
                           ct_spec = NULL,
                           ct_clst = NULL,
                           id_vars = oak_id_vars()) {
-
   admiraldev::assert_character_scalar(raw_var)
   admiraldev::assert_character_scalar(tgt_var)
   admiraldev::assert_character_scalar(tgt_val)
@@ -177,7 +176,6 @@ hardcode_no_ct <- function(tgt_dat = NULL,
                            raw_var,
                            tgt_var,
                            id_vars = oak_id_vars()) {
-
   admiraldev::assert_character_scalar(raw_var)
   admiraldev::assert_character_scalar(tgt_var)
   assertthat::assert_that(assertthat::is.scalar(tgt_val),
@@ -211,7 +209,6 @@ hardcode_ct <-
            ct_spec,
            ct_clst,
            id_vars = oak_id_vars()) {
-
     admiraldev::assert_character_scalar(raw_var)
     admiraldev::assert_character_scalar(tgt_var)
     assertthat::assert_that(assertthat::is.scalar(tgt_val),

diff --git a/tests/testthat/test-assign.R b/tests/testthat/test-assign.R
@@ -117,6 +117,7 @@ test_that("assign_ct works as expected with both `raw_dat` and `tgt_dat` as cond
   expected_result <-
     fa_tgt_dat |>
     tibble::add_column(FASPEC = c("SWABBED MATERIAL", NA, NA, "URINE", NA))
+
   expect_identical(result, expected_result)
 })