Hello,
I would like to have an actionButton disapearing after a given number of clicks.
In the following example, the actionButton disapear after one click, but I would like to set as a variable the number of times I have to click before removing the button
Have no idea actually...
library(shiny)
ui <- fluidPage(
actionButton('init','Click')
)
# The server function
server <- function(input,output)
{
observeEvent(input$init, {
removeUI(selector='#init', immediate=TRUE)
}, autoDestroy=TRUE)
}
shinyApp(ui, server)