如何将表对象导出到Excel

Question

我想从R。

将表格对象导出到Excel

我生成一个可重现的表格如下：

a <- as.numeric(round(runif(20,-40,40),2))

b <- as.numeric(round(a*1.4+60,2))

df <- as.data.frame(cbind(a, b))

t <-table(df$a,df$b)

是否可以将表对象导出到Excel，并保留表格格式？

Answer 1

您可以使用XLConnect。它将导出到您的工作目录。

library(XLConnect)
wb <- loadWorkbook("name.xlsx"), create = TRUE)
createSheet(wb, name="sheetname")
writeWorksheet(wb,t,"sheetname",startRow = 3, startCol 
+ = 1, header = FALSE)
saveWorkbook(wb)

Answer 2

只需转置它

data <- table(rpois(100, 6))
write.table(t(data),"clipboard",sep="\t",row.names=FALSE,quote=FALSE)

粘贴：

1   2   3   4   5   6   7   8   9   10  13
1   5   8   10  22  18  16  9   5   4   2

向write.csv或write.xlsx的翻译应该是明确的。

Answer 3

我认为另一种方法是使用as.data.frame.matrix（table）函数将表转换为数据帧。