# NOT RUN {
### Tooltips galore
formGroup(
label = tags$label(
"An exciting input",
tooltip(span(icon("info-circle")), "What is exciting here?")
),
radioInput(
id = "radios",
choices = c("Ready", "Set", "Go")
)
)
### Describing links (link inputs)
div(
p("Nunc rutrum turpis sed pede."),
p(
"Donec posuere augue in ",
linkInput(NULL, "quam.") %>%
tooltip("This is bound to do something")
),
p(
"Etiam vel tortor sodales ",
linkInput(NULL, "tellus") %>%
tooltip("Tell us more?"),
" ultricies commodo."
)
)
# }
Run the code above in your browser using DataLab