Tag Function

This function creates a tag

Usage

tag_Input(inputId, text, colour = "navy")

Arguments

inputId

The id to access the tag

text

The text in the tag

colour

The colour of the tag. Default is navy. Other options are grey, green, turquoise, blue, purple, pink, red, orange and yellow

Value

a tag html shiny object.

Examples

if (interactive()) {
  ui <- fluidPage(
    shinyGovstyle::header(
      main_text = "Example",
      secondary_text = "User Examples",
      logo="shinyGovstyle/images/moj_logo.png"),
    shinyGovstyle::gov_layout(size = "two-thirds",
      shinyGovstyle::tag_Input("tag1", "Complete"),
      shinyGovstyle::tag_Input("tag2", "Incomplete", "red")),
    shinyGovstyle::footer(full = TRUE)
  )

  server <- function(input, output, session) {}
  shinyApp(ui = ui, server = server)
}