将URL(href)添加到bs4Dash中的菜单项

68de4m5k  于 2023-02-14  发布在  其他
关注(0)|答案(1)|浏览(128)

我试图添加一个外部URL在一个闪亮的 Jmeter 板,使用包bs4Dash,但当我点击它是没有React。我有类似下面的例子。它不工作使用newTab = FALSEnewTab = TRUE。我错过了什么,或者这是它应该表现的方式?

# NOT RUN {
## Only run this example in interactive R sessions
if (interactive()) {
  library(shiny)
  library(bs4Dash)
  
  # A dashboard header with 3 dropdown menus
  header <- dashboardHeader(
    title = "My dashboard"
  )
  
  sidebar <- dashboardSidebar(
    sidebarMenu(
      menuItem("My menu L1", href = "https://rinterface.github.io/bs4Dash/", newTab = FALSE),
      menuItem("My menu L2",
        menuSubItem("My submenu 1", href = "https://rinterface.github.io/bs4Dash/", newTab = TRUE)
      )
    )
  )
  
  shinyApp(
    ui = dashboardPage(
      header,
      sidebar,
      dashboardBody()
    ),
    server = function(input, output) { }
  )
}
# }
zpjtge22

zpjtge221#

@德怀特,我通过黑客“解决”了这个问题。基本上,我开始使用shinydashboard::menuItem来处理那些特定的示例。我认为作者修复了这个问题,希望在下一个版本(https://github.com/RinteRface/bs4Dash/issues/225)中可以使用。

shinydashboard::menuItem(
  text = "Help",
  href = "http://example.com"
)

相关问题