我正在寻找一个具有侧边栏选项的闪亮应用程序,如图所示。我的应用程序可以更早地运行,但是现在它给了我这个错误:
tagAssert(body,type =“ div”,class =“ content-wrapper”)中的错误: 参数“ body”丢失,没有默认值
代码:
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
dashboardHeader(title = 'Basic'),
dashboardSidebar(
sidebarMenu(
id = "tabs",
menuItem("Charts", icon = icon("bar-chart-o"),
menuSubItem("Febuary Crime", tabName = "Febuary"),
menuSubItem("April Crime", tabName = "April"),
menuSubItem("June Crime", tabName = "June"),
menuSubItem("November Crime", tabName = "November")))))
我希望有一个带有侧栏选项的应用程序运行。