countup_start | R Documentation |
Start the counter.
countup_start(counter)
counter |
An object of class |
The counter
library(shiny)
ui <- fluidPage(
countupOutput("cnt"),
actionButton("start", "start")
)
server <- function(input, output, session) {
output$cnt <- renderCountup({
countup(24, start = FALSE)
})
observeEvent(input$start, {
countupProxy("cnt") %>%
countup_start()
})
}
## Not run: shinyApp(ui, server)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.