tryCatch in R

tryCatch-example.R

# test function
f <- function(x) {
  if (missing(x)) {
    stop("error, Will Robinson")
  } else {
    x
  }
}

f(1)  # 1
f()   # error

g <- function(x) {
  tryCatch(
    f(x),
    error = function(c) {  # need to accept the condition even if we don't use it
      return("There was an error!")
    }
  )
}

g(1)  # 1
g()   # error message caught, output is string returned by our error handler