R Shiny:有条件地要求用户 select pickerInput

R Shiny: Conditionally require user to select pickerInput

我在应用程序中有两个 pickerInput 值。在第一个 geography 中,用户可以 select 查看 state(默认)或 county 数据。如果用户 selects county,我想要求他们从第二个 pickerInput 中选择一个州,这只是一个州列表。 input$geography == "state".

时不需要用户选择状态

我考虑过将它放在 modalDialogue 中,但它不起作用。我也试过 updatePickerInput 也没有用。

有条件地要求用户 select 来自 pickerInput 的值的最佳方式是什么?

谢谢。

这是 shinyjs 的解决方案:



library(shiny)
library(shinyWidgets)
library(shinyjs)

ui <- fluidPage(

  useShinyjs(),

  pickerInput("pick_1", choices = c("state","county"), multiple = FALSE, selected = "state"),
  shinyjs::hidden(
    pickerInput("pick_2", choices = state.name, multiple = TRUE)
  )


)

server <- function(input, output, session) {

  observe({
    toggleElement("pick_2", condition = input$pick_1 == "state")

  })


}

shinyApp(ui, server)