safe_median() works stats::median() but warns if some elements of ...
are never used.
safe_median(x, ...)
# S3 method for class 'numeric'
safe_median(x, ..., na.rm = TRUE)x <- c(1:10, NA)
safe_median(x, na.rm = TRUE)
#> [1] 5.5
median(x, na.rm = TRUE)
#> [1] 5.5
try(median(x, na.mr = TRUE))
#> [1] NA
try(safe_median(x, na.mr = TRUE))
#> Error in safe_median(x, na.mr = TRUE) :
#> Arguments in `...` must be used.
#> ✖ Problematic argument:
#> • na.mr = TRUE
#> ℹ Did you misspell an argument name?
try(median(1, 2, 3))
#> [1] 1
try(safe_median(1, 2, 3))
#> Error in safe_median(1, 2, 3) : Arguments in `...` must be used.
#> ✖ Problematic arguments:
#> • ..1 = 2
#> • ..2 = 3
#> ℹ Did you misspell an argument name?