闪亮的应用因错误而停止。如何处理此类错误

时间:2019-03-29 17:49:07

标签: r error-handling shiny

我有一个闪亮的应用程序,在其中我从其他程序包调用函数。因此,当我调用此函数时,如果值不在某个范围内,则该函数将引发错误,并且应用程序将停止。 例如:

data <- callFunction(cost,input1,input2)

因此,当callFunction引发错误时,它将停止该应用程序。我不希望该应用程序停止运行,而只是在该应用程序上抛出一条消息,说您的输入不正确,请对其进行修改。我该如何在闪亮的应用程序中执行此操作。谢谢。

1 个答案:

答案 0 :(得分:0)

对于错误处理,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!