Add a Bootstrap3 alert component to the UI
bsAlert(..., status = "success", closeable = TRUE)
any shiny tag or tagList you want to add to the alert body, or any additional attributes you want to add to the alert element.
string, one of "success", "info", "warning", "danger"
bool, can the alert be closed?
shiny tag element
Read more here: https://getbootstrap.com/docs/3.3/components/#alerts
if(interactive()) {
library(shiny)
ui <- fluidPage(
bsAlert(tags$b("Success: "), "You made it", status = "success"),
bsAlert(tags$b("Info: "), "Something happened", status = "info"),
bsAlert(tags$b("Warning: "), "Something is not right", status = "warning"),
bsAlert(tags$b("Danger: "), "Oh no...", status = "danger")
)
server <- function(input, output, session) {}
shinyApp(ui, server)
}