Сбросить кнопку действия обратно в NULL

Question

как человек может вернуть actionButton обратно к выбранному = символ (0), а не к одной из доступных им переключателей,

любая идея?

Answer 1

Вы пытаетесь использовать кнопку действия для сброса переключателя?Попробуйте использовать updateRadioButton (https://shiny.rstudio.com/reference/shiny/0.14/updateRadioButtons.html). Вот пример:

library("shiny")
ui <- fluidPage(
  sidebarPanel(
    radioButtons("radio_buttons", "Radio buttons", list("option 1", "option 2"), 
                 selected = character(0)),
    actionButton("reset_button", "Reset button")
  )




)

server <- function(input, output, session) {
  observeEvent(input$reset_button, {

    updateRadioButtons(session, "radio_buttons", "Radio buttons", list("option 1", "option 2"),
                       selected = character(0)
    )
  })
}

shinyApp(ui = ui, server = server) 

Answer 2

Вы можете использовать для этого пакетосмейджин, спасибо Дину Аттали за этот замечательный пакет.

Это пример:

if (interactive()) {
     library(shiny)
  library(shinyjs)

  shinyApp(
   ui = fluidPage(
   useShinyjs(),
   div(
   id = "form",
          textInput("name", "Name"),
           radioButtons("gender", "Gender", c("Male", "Female"))
         ),
        actionButton("resetAll", "Reset all"),
         actionButton("resetName", "Reset name"),
         actionButton("resetGender", "Reset Gender")
       ),
       server = function(input, output) {
         observeEvent(input$resetName, {
           reset("name")
         })
         observeEvent(input$resetGender, {
           reset("gender")
         })
         observeEvent(input$resetAll, {
           reset("form")
         })
      }
     )
   }

Вы можете прочитать об этом в здесь

Answer 3

Насколько мне известно, невозможно сбросить actionButton в shiny.

. Вы можете рассмотреть возможность увеличения reactiveValue при каждом нажатии кнопки, а затем проверить, является ли это значение нечетным или четным длявыполнить заданное действие.