updated

Author: ShreyaSreeram27

tests/testthat/test-add_risktable.R

@@ -336,12 +336,12 @@ test_that("add_risktable() works with ggsurvfit() `start.time` and negative time
 
 
 test_that("add_risktable() works with multiple survival endpoints (Issue #212)", {
-  
+
   os_data <- df_lung %>% dplyr::mutate(PARAM = "Overall Survival")
   pfs_data <- df_lung %>% dplyr::mutate(time = time * 0.7, PARAM = "Progression-Free Survival")
   combined_data <- dplyr::bind_rows(os_data, pfs_data)
-  
- 
+
+
   expect_error(
     p <- survfit2(Surv(time, status) ~ PARAM, data = combined_data) %>%
       ggsurvfit() + add_risktable(),