missing x documented

Author: dajmcdon

R/autoplot.R

@@ -13,7 +13,7 @@ ggplot2::autoplot
 #'
 #'
 #' @inheritParams epiprocess::autoplot.epi_df
-#' @param object An `epi_workflow`
+#' @param object,x An `epi_workflow`
 #' @param predictions A data frame with predictions. If `NULL`, only the
 #'   original data is shown.
 #' @param .levels A numeric vector of levels to plot for any prediction bands.

R/step_climate.R

@@ -266,7 +266,7 @@ prep.step_climate <- function(x, training, info = NULL, ...) {
 
   fn <- switch(x$center_method,
     mean = function(x, w) stats::weighted.mean(x, w, na.rm = TRUE),
-    median = function(x, w) median(x, na.rm = TRUE)
+    median = function(x, w) stats::median(x, na.rm = TRUE)
   )
   # suppose it's week 52, and there is no week 53 this year; then
   # as originally written for 1 week ahead this grabs from week 52+1 %% 53