r - Shiny : showing one message for all errors

Question

我在 R 的 Shiny 中有一个应用程序。我想处理消息，以便用户看不到发生了什么错误。我知道通过

 tags$style(type="text/css",
                        ".shiny-output-error { visibility: hidden; }",
                        ".shiny-output-error:before { visibility: hidden; }"
            ),

我可以完全禁用错误消息，但我想向用户显示一条消息，例如

An error occurred. Please contact the admin.

每当发生任何类型的消息时(并且仍然在日志中保留原始错误消息)。有什么想法吗？

Answer 1

您可以在应用中的某个位置添加options(shiny.sanitize.errors = TRUE)。然后，所有错误消息都将替换为通用错误消息:

错误:发生错误。检查您的日志或联系应用程序作者以获取说明。

如果您确实希望特定错误未经处理就通过，您可以使用 base::stop(shiny::safeError(e)) 而不仅仅是 base::stop(e )，其中 e 是错误字符串或类为“error”的对象。

引用:https://shiny.rstudio.com/articles/sanitize-errors.html