答案 0 :(得分:0)
我认为可能存在版本问题,因为对我来说一切正常:
library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
ui = dashboardPagePlus(
header = dashboardHeaderPlus(
enable_rightsidebar = TRUE,
rightSidebarIcon = "gears"
),
sidebar = dashboardSidebar(
sidebarMenu(
menuItem("DASHBOARD1", tabName = "Spectrum", icon = icon("table")
), #menuItem
menuItem("DASHBOARD2", tabName = "LTE", icon = icon("mobile-alt"))
)),
body = dashboardBody(),
title = "TEST"
),
server = function(input, output) { }
)
这是示例会话信息:
R版本3.5.2(2018-12-20)
shiny_1.2.0
shinydashboard_0.7.1
shinydashboardPlus_0.6.0.9000