r - 使用 "shinyjs"包控制 Shiny 仪表板菜单项的可见/不可见

Question

我可以友好地询问有关“shinyjs”包的问题吗？

我构建了一个 Shiny 的仪表板，我想使用“shinyjs”设置一个功能来控制菜单项的可见/不可见。

我设计的第一个菜单项/页面是为此仪表板选择数据。用户选择了他们想要的数据后，我不希望他们返回来更改他们的选择。所以我想设计一个按钮，如果用户单击此按钮，第一个菜单项将消失，但其余菜单项将出现。

我确信这是可能的，但我认为它需要一些 Javascript 知识来编码。

这就像这个问题的答案，但我只是切换菜单项的可见/不可见。

activate tabpanel from another tabpanel

非常感谢您的回复!

谢谢!

乔安娜

Answer 1

我通过为我想要隐藏/显示的项目添加tags$div() 来解决这个问题。

用户界面:

hidden(tags$div(
  class = "header",
  id = "haha",
  menuItem(
    tags$em("DIY Pivot Table", style = "font-size:170%"),
    icon = icon("bar-chart-o"),
    tabName = "Pivot"
  ),
  br(),
  menuItem(
    tags$em("Search Data", style = "font-size:170%"),
    icon = icon("bar-chart-o"),
    tabName = "searchdata"
  )
)) 

服务器:

observeEvent(input$showSidebar, {
shinyjs::toggle("haha")

})

这样就可以使用input$showSidebar来控制菜单项的可见/不可见。