powered by
Modify a function so that it returns a default value when there is an error.
failwith(default = NULL, f, quiet = FALSE)
a function
default value
function
all error messages be suppressed?
try_default
f <- function(x) if (x == 1) stop("Error!") else 1 if (FALSE) { f(1) f(2) } safef <- failwith(NULL, f) safef(1) safef(2)
Run the code above in your browser using DataLab