if (interactive()) {
card(
header = FALSE,
shiny::h2("Standard alert (closeable)"),
alert("EX1", type = "standard",
color = "primary"),
alert("EX2", type = "standard",
color = "secondary"),
alert("EX3", type = "standard",
color = "secondary", outline = TRUE),
alert("EX4", type = "standard",
color = "danger", outline = TRUE, close = TRUE),
alert("EX5", type = "standard",
close = TRUE),
alert("EX6", type = "standard",
color = "primary", icon = shiny::icon("info"))
)
}
Run the code above in your browser using DataLab