如何在R中将ftable转换为excel，而无需大量格式化（合并、取消报价）

关于Pandas（Python）在R上的工作，我所怀念的是数据帧导出到excel的方式。 在R中，ftable显示的表类似于pandas多索引数据帧。当我使用excel时，每一行和每一列在每个单元格中都是可以的，如果需要，甚至可以在列名中合并单元格

在R中，我用write.table尝试了write.ftable

df = data.frame(a = c(1:6), b = rep(c('G1','G2'),3), c = rep(c('A','D','F'),2), d = c('F','F','F','F','M','M'))
df2 = ftable(xtabs(a~b+c+d, df), row.vars = 1)
write.table(write.ftable(df2))

但我需要花很多时间在excel中格式化（文本到列、取消引用、合并等）

在R中有一种方法（包）可以将ftable导出到excel，而无需进行大量格式化。 提前感谢。

试试这个：

library(xtable)
print(xtable(as.matrix(df2)), type = "html", file = "out.html")
file.show("out.html")

现在复制输出并粘贴到Excel中。

如何：

library(DescTools)
txt <- stats:::format.ftable(df2, quote=FALSE)
XLView(txt, row.names = FALSE, col.names = FALSE)

库（描述工具）
txt Hi，不熟悉Python代码应该如何工作，但您可以通过使用以下命令获得与屏幕上打印的相同的输出：
r这看起来像我正在寻找的。使用anser，现在只需将单元格合并到列中。非常感谢。你能在
as.data.frame（as.matrix（df2））
上使用
write.table
来获得相同的格式吗？不，
write.table
不生成HTML.ha，我意识到…很抱歉不清楚。这更像是对生成html文件，然后复制输出并粘贴到Excel中的注释。我认为html阶段可以绕过。将html粘贴到Excel中可以保持布局。是的。与@user20650答案类似，但输出不同。我更喜欢write.table（txt，“剪贴板”）