Блестящее приложение останавливается из-за ошибки. Как справиться с такими ошибками

Question

У меня блестящее приложение, в котором я вызываю функцию из другого пакета. Поэтому, когда я вызываю эту функцию, если значения не находятся в определенном диапазоне, эта функция выдает ошибку, и приложение останавливается. Например, функция:

data <- callFunction(cost,input1,input2)

Поэтому, когда callFunction выдает ошибку, приложение останавливается. Я не хочу, чтобы приложение останавливалось и просто выдавало сообщение о том, что ваши данные неверны, пожалуйста, измените его. Как я могу сделать это в блестящем приложении. Спасибо.

Answer 1

Для обработки ошибок R реализует tryCatch

Test <- list(5,4,"foo","bar")
res <-  sapply(Test,function(el)
  {
  tryCatch({
#Expression that might throw an error
  el + 5
}, warning = function(w) {
  print("Warning. Minor Problems!") #warning handling
}, error = function(e) {
  print("Error!. Major Problems!") #error handling
}, finally = {
#possible clean-up code.
})})

res
[1] "10"       "9"   "Error!. Major Problems!" "Error!. Major Problems!