Shiny 中的 renderDataTable 未正确渲染输出

Question

我正在执行下面 DT github 页面上发布的一个非常小的 renderDataTable 示例 http://rstudio.github.io/DT/shiny.html

library(shiny)
shinyApp(
  ui = fluidPage(DT::dataTableOutput('tbl')),
  server = function(input, output) {
    output$tbl = DT::renderDataTable(
      iris, options = list(lengthChange = FALSE)
    )
  }
)

但是，执行此代码后我看到的输出是垃圾，列名称在单行中列出，没有空格。

我在卸载 DT 软件包并重新安装后尝试了此操作

devtools::install_github('rstudio/DT')

没有任何改变，结果仍然相同。我不明白为什么 DT::renderDataTable() 不起作用。非常感谢任何建议。？

-------------更新----------------

在我开始使用 Flexdashboard 构建一些 Shiny 的应用程序后，我开始注意到这个问题。在安装 Flexdashboard 软件包之前，一切正常，没有任何问题，在安装 Flexdashboard 后，我在使用 renderDataTable 函数时注意到数据表存在此问题

Answer 1

此问题是关于在使用 renderdatatable 时无法查看数据表的内容功能。

如果用户使用renderdatatable，就会发生这种情况常规 Shiny 应用程序中的功能从 Shiny 切换到 flexdashboard尝试运行flexdashboard使用renderdatatable的应用程序功能并切换回 Shiny 。

flexdashboard库 1) 不会通过 renderdatatable 呈现数据表功能，至少到今天还没有 2)进一步的flexdashboard当用户尝试从 flexdashboard 切换回常规 Shiny 时，库会损坏数据表包中的一些功能。 ，用户可能会发现renderdatatable之前运行的函数可能无法准确呈现数据表。

根据 JJ Allaire 的说法，解决方案是将这两行添加到你的 Shiny

 options(DT.fillContainer = FALSE) 
 options(DT.autoHideNavigation = FALSE) 

这将清理所有钩子(Hook) flexdashboard在datatable内创建包和数据表应该像以前在 Shiny 中一样正常渲染。