Deprecated functions
Examples
a <- function(...) {
.Deprecated("b")
b(...)
}
b <- function(x) {
x + 1L
}
withCallingHandlers(
expr = a(1L),
warning = function(w) {
print(w)
invokeRestart("muffleWarning")
}
)
#> <deprecatedWarning: 'a' is deprecated.
#> Use 'b' instead.
#> See help("Deprecated")>
#> [1] 2