我正在尝试指定我的 Shiny Dashboard 标题的宽度,如此处所述。但是我不断收到错误Error in FUN(X[[1L]], ...) : Expected an object with class 'shiny.tag'.,但只有当我添加额外的行来指定标题宽度时titleWidth = 400。没有这条线,应用程序运行良好(没有应用程序只是一个骨架页面来重现错误)。
代码如下......非常感谢任何帮助。
## app.R ##
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
  dashboardHeader(
    title = "Title Which is Kinda Long",
    titleWidth = 400
    ),
  dashboardSidebar(),
  dashboardBody()
)
server <- function(input, output) { }
shinyApp(ui, server)