Fix checks

insightsengineering · May 16, 2024 · c308c5e · c308c5e
1 parent 1564b51
commit c308c5e
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 2 deletions.
diff --git a/R/ard_survival_survfit.R b/R/ard_survival_survfit.R
@@ -111,6 +111,8 @@ ard_survival_survfit <- function(x, times = NULL, probs = NULL, type = NULL) {
 #'
 #' @inheritParams cards::tidy_as_ard
 #' @inheritParams ard_survival_survfit
+#' @param start.time (`numeric`)\cr
+#'   default starting time. See [survival::survfit0()] for more details.
 #'
 #' @return a `tibble`
 #'
@@ -151,7 +153,7 @@ ard_survival_survfit <- function(x, times = NULL, probs = NULL, type = NULL) {
   # tidy survfit results
   x_cols <- intersect(names(x), c("time", "n.risk", "surv", "std.err", "upper", "lower", "strata"))
   tidy_x <- data.frame(x[x_cols]) %>%
-    dplyr::rename(estimate = surv, std.error = std.err, conf.high = upper, conf.low = lower)
+    dplyr::rename(estimate = "surv", std.error = "std.err", conf.high = "upper", conf.low = "lower")
 
   strat <- "strata" %in% names(tidy_x)
 

diff --git a/man/dot-process_survfit_time.Rd b/man/dot-process_survfit_time.Rd