Fail with specified value.
Modify a function so that it returns a default value when there is an error.
failwith(default = NULL, f, quiet = FALSE)
default |
default value |
f |
function |
quiet |
all error messages be suppressed? |
a function
f <- function(x) if (x == 1) stop("Error!") else 1 ## Not run: f(1) f(2) ## End(Not run) safef <- failwith(NULL, f) safef(1) safef(2)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.