Question

这是一个可用于重现我的错误的数据集（文本列确实很重要）：

theRows <- c('Row One', 'Row Two', 'Row Three', 'Row Four', 'Row Five')
x1 <- runif(5, 0, 1)
x2 <- runif(5, 0, 1)
x3 <- runif(5, 0, 1)
x4 <- runif(5, 0, 1)
x5 <- runif(5, 0, 1)
x6 <- runif(5, 0, 1)
x7 <- runif(5, 0, 1)
x8 <- runif(5, 0, 1)
x9 <- runif(5, 0, 1)
x10 <- runif(5, 0, 1)
x <- data.frame(theRows, x1, x2, x3, x4, x5, x6, x7, x8, x9, x10)

我需要使用x创建两个单独的数据表，每个数据表都有问题。当我尝试添加按钮以保存为CSV或Excel文件时...

library(DT)
datatable(x, 
          extensions = 'Buttons', 
          options = list(dom = 'Bfrtip', 
                         buttons = c('copy', 'csv', 'excel')))

我收到错误The extension buttonsdoes not exist（是的，错误信息中出现错字）。

当我尝试修改文本列进行滚动时，就像这样......

datatable(x, extensions = 'FixedColumns', 
          options = list(dom = 't', 
                         scrollX = TRUE, 
                         fixedColumns = list(leftColumns = 2, rightColumns = 0)))

表格呈现正确，但列theRows未修复。无论我传递给leftColumns的是什么号码，行号都是唯一的固定列。

我正在遵循DT文档中提出的代码，因此我对导致这些问题的原因感到困惑。任何人都可以建议我做错了什么？

（这是一个闪亮的应用程序，但是当我在闪亮之外重现代码时，我遇到了两个问题。）

Answer 1

正如评论者建议的那样，您必须运行DT的devtools版本才能使这些扩展正常工作。

要运行devtools版本，请在R控制台中输入devtools::install_github('rstudio/DT')。如果收到错误消息，请先运行install.packages(devtools)，然后devtools::安装命令就可以了。

如何在R中使用DT修复这些错误？

1 个答案: