# NOT RUN {
## Only run examples in interactive R sessions
if (interactive()) {
dropdown(
"Content goes here",
style = "unite", icon = icon("gear"), status = "danger", width = "300px",
animate = animateOptions(
enter = animations$fading_entrances$fadeInLeftBig,
exit = animations$fading_exits$fadeOutRightBig
)
)
}
# }
Run the code above in your browser using DataLab