if (interactive()) {
card(
title = "Standard card",
collapsed = TRUE,
alert.text = "An alert for the content",
alert.bg = "warning",
toolbar = list(collapse = TRUE,
maximize = TRUE, close = FALSE, menu = TRUE),
shiny::h3("Sample text"),
"Lorem www.pharmacometric.com"
)
}
Run the code above in your browser using DataLab