Tag
Tag.Rd
Documentation: https://blueprintjs.com/docs/#core/components/tag
Examples
library(shiny.blueprint)
library(shiny)
ui <- function(id) {
tagList(
Tag(active = TRUE, "Hello"),
Tag(active = TRUE, large = TRUE, "Hello"),
Tag(active = TRUE, round = TRUE, "Hello"),
Tag(active = FALSE, icon = "home", round = TRUE, large = TRUE, "Hello"),
Tag(active = TRUE, rightIcon = "home", "Hello"),
Tag(active = TRUE, round = TRUE, intent = "primary", interactive = TRUE, "Hello"),
Tag(active = TRUE, round = TRUE, intent = "warning", interactive = TRUE, "Hello"),
Tag(active = TRUE, round = TRUE, intent = "success", interactive = TRUE, "Hello"),
Tag(active = TRUE, round = TRUE, intent = "danger", interactive = TRUE, "Hello")
)
}
server <- function(id) {
moduleServer(id, function(input, output, session) {})
}
if (interactive()) shinyApp(ui("app"), function(input, output) server("app"))