在 R Shiny 中扩大通知弹出窗口？

Question

如何在 R Shiny 中扩大通知范围？现在它正在切断更长的错误消息。

library(shiny)

ui <- fluidPage(
  actionButton("test", "Test")
)

server <- function(input, output, session) {
  observeEvent(input$test, {
      showNotification("You did it! Now make me wider", type = "message")
  })
}

shinyApp(ui, server)

Answer 1

CSS 调整闪亮通知的宽度

/* Put shiny notifications front and center */
#shiny-notification-panel {
  top: 0;
  bottom: unset;
  left: 0;
  right: 0;
  margin-left: auto;
  margin-right: auto;
  width: 100%;
  max-width: 450px;
}