## Only run examples in interactive R sessions
if (interactive()) {
dropdown(
"Your contents goes here ! You can pass several elements",
circle = TRUE, status = "danger", icon = icon("gear"), width = "300px",
animate = animateOptions(enter = "fadeInDown", exit = "fadeOutUp", duration = 3)
)
}
Run the code above in your browser using DataLab