闪亮的应用程序因错误而停止。如何管理此类错误答案

【问题标题】：Shiny app stops due to error. How to manage such errors闪亮的应用程序因错误而停止。如何管理此类错误
【发布时间】：2019-08-20 17:22:29
【问题描述】：

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

data <- callFunction(cost,input1,input2)

因此，当callFunction 抛出错误时，它会停止应用程序。我不希望应用程序停止，只是在应用程序上显示一条消息，说您的输入不正确，请修改它。我怎样才能在闪亮的应用程序中做到这一点。谢谢。

【问题讨论】：

您可以使用验证拒绝输入，docs

标签： r error-handling shiny

【解决方案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!

【讨论】：