在Shiny app中通知用户他的错误输入

Question

让我们来看看其中一个demos。

runExample("09_upload")

我使用提供的文件执行一些计算并显示所有上传文件的聚合性能。因此，我使用像

这样的东西

tryCatch(compute.smth(), error=function(e){})

以便显示的结果不受错误输入的影响。但是，我想以某种方式表明上传坏文件会导致错误，通知用户输入的问题。它会像

tryCatch(compute.smth(), error=badFile())

其中 badFile（）应该修改一些可显示的输出。有任何想法吗？ 作为最后的手段，this可能是一种选择，但我想要一些原生的Shiny。

Answer 1

您可以使用ShinySky软件包显示如下警告：https://github.com/AnalytixWare/ShinySky

您可以使用

安装软件包

install.packages("devtools")#if not alrady installed
devtools::install_github("ShinySky","AnalytixWare")

在ui.R中放置 shinyalert（id），以显示警告的位置。

在您的服务器中.R

1. 确保将3个参数功能传递给shinyServer egshinyServer（函数（输入，输出，会话）{
2. 使用 showshinyalert（id，HTMLText，session）来显示提醒。单击警报将忽略它。
3. 请参阅此要点，例如https://gist.github.com/xiaodaigh/7707701

运行这个也看一个例子

shinysky::run.shinysky.example()