如何在R Shiny中添加消息框？

Question

我正在尝试使用uiOutput在Shiny中显示诸如“用户已验证”或“帐户已创建”的消息，但它会覆盖我不需要的Shiny仪表板的主页。

在Shiny中是否有一种函数可以添加类似于消息框的东西，一旦显示了消息就可以关闭，然后用户可以继续进行？

- Kaverisonu

---

是的，您可以使用 insertUI 和 removeUI，但基本的shiny并没有“消息框”作为UI，您需要使用一些CSS进行自定义。 - agenis

Answer 1

你可以使用 modalDialogs 来实现，以下是一个可用的示例：

library(shiny)
ui = fluidPage(
  actionButton("login", "Log in"),
  textInput('userid','User id:',value=' definitely not Florian')
)
server = function(input, output) {
  observeEvent(input$login, {
    showModal(modalDialog(
      title = "You have logged in.",
      paste0("It seems you have logged in as",input$userid,'.'),
      easyClose = TRUE,
      footer = NULL
    ))
  })
}

shinyApp(ui,server)

希望这能帮到你！

- Florian

---

谢谢！实际上我之前用过ModalDialog来进行用户登录，但没有想到可以用它来显示消息。这个方法很有效。 - Kaverisonu