r - 通知用户他在 Shiny 应用程序中的错误输入

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 例如 shinyServer(function(input, output,session) {
2. 使用 showshinyalert(id,HTMLText,session) 显示警报。单击警报将关闭它。
3. 参见此要点，例如 https://gist.github.com/xiaodaigh/7707701

也运行这个看例子

shinysky::run.shinysky.example()