ShinyWidgets::pickerInput 的问题：未取消选择选项

编程问答 2022-05-27

问题描述

目前我在使用 shinyWidgets::pickerinput() 时遇到问题。它不像以前在我的程序中那样正常工作。在这个例子中也出现了同样的问题。

library("shiny")
library(shinyWidgets)

ui <- fluidPage(
  pickerInput(
    inputId = "somevalue",label = "A label",choices = c("a","b"),#multiple = FALSE   #--> the problem occurs even with multiple = FALSE
  ),verbatimtextoutput("value")
)

server <- function(input,output) {
  output$value <- renderPrint(input$somevalue)
}

shinyApp(ui,server)

如果我想选择例如选项 b，则不会取消选择选项 a。除此之外，如果我点击窗口中的其他地方，弹出窗口不会关闭。

enter image description here

enter image description here

其他人有这个问题吗？ 预先非常感谢您！

所有版本都应该是最新的。 R 版本：4.0.3 | Rstudio 版本：1.3.1056 | 闪亮版本：1.6.0 | ShinyWidgets 版本：0.5.7

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

pickerinputrrshinyshinywidgets