在光泽（R）中重现Navbar示例的问题

Question

我正在尝试从Shiny网站（http://shiny.rstudio.com/gallery/navbar-example.html）重现Navbar示例，但稍作修改（请参阅下面的代码）。但是，主面板中既不显示绘图，也不显示表格。面板只是空的，没有显示错误消息。当我在代码中引入helpText元素时，会显示它。当我在我的机器上运行RStudio或在spark.rstudio.com上访问它时，这是相同的。

你能指出出了什么问题吗？谢谢！

ui.R：

shinyUI(navbarPage("test",
               tabPanel("START",
                        sidebarLayout(
                          sidebarPanel(
                            radioButtons("plotType", "Plot type",
                                         c("Scatter"="p", "Line"="l")
                            )
                          ),
                          mainPanel(
                            plotOutput("plot")
                          )
                        )
               ),
               tabPanel("Summary",
                        verbatimTextOutput("summary")
               ),
               navbarMenu("More",
                          tabPanel("Table",
                                   dataTableOutput("table")
                          ),
                          tabPanel("About",
                                   dataTableOutput("table")
                          )
               )
))

server.R

shinyServer(function(input, output, session) {
  output$plot <- renderPlot({
    plot(cars, type=input$plotType)
  })

  output$summary <- renderPrint({
    summary(cars)
  })

  output$table <- renderDataTable({
    cars
  }, options=list(iDisplayLength=10))
})