solved lintrs

epiverse-trace · Nov 6, 2024 · 4eda42f · 4eda42f
1 parent 30bdbce
commit 4eda42f
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/R/coh_effectiveness.R b/R/coh_effectiveness.R
@@ -80,7 +80,7 @@ effectiveness <- function(vaccineff_data,
     end_cohort = vaccineff_data$end_cohort,
     at = at
   )
-  
+
   eff_obj <- coh_eff_hr(
     data_set = data_set,
     outcome_status_col = "outcome_status",

diff --git a/tests/testthat/test-coh_match_iterate.R b/tests/testthat/test-coh_match_iterate.R
@@ -50,8 +50,7 @@ adjusted_0 <- adjust_exposition(matched_cohort = matched,
                                 censoring_date_col = censoring_date_col,
                                 immunization_date = immunization_date_col,
                                 start_cohort = start_cohort,
-                                end_cohort = end_cohort
-)
+                                end_cohort = end_cohort)
 
 # Test for basic expectations and correctness of algorithm
 test_that("`rematch`: Correctness", {
@@ -209,7 +208,8 @@ test_that("`rematch`: tryCatch error handle", {
       end_cohort = end_cohort,
       im = 0
     ),
-    regexp = "Error at iteration 0 for v: No matches were found.- skipping to next"
+    regexp = paste0("Error at iteration 0 for v: No matches were found.",
+                    "- skipping to next")
   )
 })