从R导出数据到Word格式的表格

Question

我多次遇到这个问题。 我想将我从R制作的汇总数据集导出到 Word 中的表格中。 目前我能做的最好的就是先把数据导出到Excel，然后把Excel里面的表格复制到word中。

我的示例数据：

> sum_tab
        col1 col2 col3
2    move up   10   10
3  no change    4    9
1  move down   12    7
21   move up   11    5
31 no change    4   16
11 move down   11    5
22   move up    9    6
32 no change   10   14
12 move down    7    6

出口到Excel：

library(xlsx)
write.xlsx(sum_tab, file = "sum_tab.xlsx")

有没有一种巧妙的方法可以将sum_tab数据导出到 10 行 4 列的 Word 表格中？

Answer 1

您可以使用这两个选项之一，使用rmarkdown或sjPlot包

sum_tab = data.frame(col1 = c("move up","no change", "move down", "move up", "no change","move down","move up","no change","move down"), 
                     col2 = c(10,4,12,11,4,11,9,10,7), col3 = c(10,9,7,5,16,5,6,14,6))
row.names(sum_tab) <- c(2,3,1,21,31,11,22,32,12)
sum_tab
library(sjPlot)
tab_df(sum_tab)

在查看器中，您可以使用光标选择表并将其粘贴到Word中。

Answer 2

sjPlot 已使用重要的file参数更新其功能，您可以使用该参数指定.doc文件（注意：不是.docx ）。

所以要保存sum_tab dataframe，你只需写：

sjPlot::tab_df(sum_tab, file = "output.doc")