r - R - 找不到函数“dashboardPagePlus”

Question

我尝试使用dashboardPagePlus 创建一个闪亮的应用程序。

我已经导入了 shinydashboard 和 shinydashboardPlus 包。但是当我运行 UI 时收到一条错误消息。

dashboardPagePlus 中的错误（skin = "black"，dashboardHeaderPlus(title = "title")，：找不到函数 "dashboardPagePlus"

我不知道为什么。我尝试从 RDocumentation 运行示例代码。但是还是有这个问题。

示例代码：

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
  ui = dashboardPagePlus(
    header = dashboardHeaderPlus(
      enable_rightsidebar = TRUE,
      rightSidebarIcon = "gears"
    ),
    sidebar = dashboardSidebar(),
    body = dashboardBody(),
    rightsidebar = rightSidebar(),
    title = "DashboardPage"
  ),
  server = function(input, output) { }
)

如何解决？非常感谢。

标签： rshinyshinydashboard

Answer 1

正如评论中已经提到的，如果你使用 {shinydashboardPlus} >= 2.0.0，你需要重写你的代码如下：

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPage(
    header = dashboardHeader(),
    sidebar = dashboardSidebar(),
    body = dashboardBody(),
    controlbar = dashboardControlbar(
      skin = "dark",
      controlbarMenu(
        id = "menu"
      )
    ),
    title = "DashboardPage"
  ),
  server = function(input, output) { }
)