相关疑难解决方法(0)

我正在使用shinydashboard,并且需要构建两级嵌套子菜单.我正在尝试这个并且不会起作用:

library(shinydashboard)
sidebar <- dashboardSidebar(
  sidebarMenu(id = 'sidebarmenu',
              menuItem('x', tabName = 'x', icon = icon('line-chart')),
              menuItem('y', tabName = 'y',
                       icon = icon('line-chart'),
                       menuSubItem('a',
                                   tabName = 'a',
                                   icon = icon('line-chart')),
                       menuSubItem('b',
                                   tabName = 'b',
                                   icon = icon('line-chart'),
                                   menuSubItem('l',
                                               tabName = 'l',
                                               icon = icon('line-chart')),
                                   menuSubItem('m',
                                               tabName = 'm',
                                               icon = icon('line-chart'))),
                       menuSubItem('c',
                                   tabName = 'c',
                                   icon = icon('line-chart'))
              )))

给我错误:

Error in menuSubItem("b", tabName = "b", icon = icon("line-chart"), menuSubItem("l",  : 
  Can't specify both href and tabName

是否有可能建立两级嵌套？当然,上面的删除l和m …

在shinydashboard,可以创建menuItem()s,它们是侧栏中的选项卡.我希望能够使用标准input$foo语法轮询哪个选项卡处于活动状态.

但是,我无法这样做.我尝试引用menuItem()'s tabName或者id什么也没做.

有办法吗？