Description Usage Arguments Source Examples
View source: R/hover_download_button.R
Animate a downloadButton and it's icon using Hover.css
1 2 3 4 5 6 7 8 |
outputId |
The name of the output slot that the downloadHandler is assigned to. |
label |
The label that should appear on the button. |
button_animation |
The name of the button animation. |
icon_animation |
The name of the icon animation. |
class |
Additional CSS classes to apply to the tag, if any. |
... |
Other arguments to pass to the container tag function. |
https://github.com/IanLunn/Hover
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 | if (interactive()) {
library(shiny)
library(hover)
ui <- fluidPage(
use_hover(),
hover_download_button(
outputId = "downloadData",
label = "Download",
button_animation = "rotate",
icon_animation = "spin"
)
)
server <- function(input, output) {
# Our dataset
data <- mtcars
output$downloadData <- downloadHandler(
filename = function() {
paste("data-", Sys.Date(), ".csv", sep="")
},
content = function(file) {
write.csv(data, file)
}
)
}
shinyApp(ui, server)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.