bug fix for downstream (#949)

Fixes #948
insightsengineering · Jun 6, 2023 · c390b0b · c390b0b
1 parent cefccf2
commit c390b0b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/kaplan_meier_plot.R b/R/kaplan_meier_plot.R
@@ -971,7 +971,7 @@ h_grob_tbl_at_risk <- function(data, annot_tbl, xlim) {
   annot_tbl <- expand.grid(
     time = seq(0, xlim, y_int),
     strata = unique(annot_tbl$strata)
-  ) %>% left_join(annot_tbl, by = c("time", "strata"))
+  ) %>% dplyr::left_join(annot_tbl, by = c("time", "strata"))
   annot_tbl[is.na(annot_tbl)] <- 0
   y_str_unit <- as.numeric(annot_tbl$strata)
   vp_table <- grid::plotViewport(margins = grid::unit(c(0, 0, 0, 0), "lines"))