r - 在excel的同一张表中添加R输出

Question

我一直在使用以下函数将我的输出放在 R 中的不同工作表中，但是如果我希望我的输出如下面的示例所示，该怎么办

data<-loadWorkbook("trial.xls",create=TRUE)
createSheet(data,name="tr1")
writeWorksheet(data,rows,sheet="tr1")
saveWorkbook(data)

所以我希望我的电子表格看起来像这样

Values Median STD Length
3       5      6   7
6       7      7   8
Values Median STD Length
4      7      8   1
6       9      0   3

多谢你们

Answer 1

您可以在 Excel 工作表中设置位置starRow=。writeWorksheet()这是我在一张纸上写数据iris和cars. 我将位置设置在startRow=(nrow(iris)+2)上一个表的下方（+2 用作第一个表还包含不计入的列名nrow()）。要删除第二个表的标题，请进行第二header=FALSE次writeWorksheet()调用。

library(XLConnect)    
data(iris)
data(cars)
wb<-loadWorkbook("trial.xls",create=TRUE)
createSheet(wb,name="tr1")
writeWorksheet(wb,iris,sheet="tr1")
writeWorksheet(wb,cars,sheet="tr1",startRow=(nrow(iris)+2),header=FALSE)
saveWorkbook(wb)

Answer 2

您可能还想看看appendWorksheet. 有关help(appendWorksheet)更多信息，请参阅。

示例代码：

需要（XLConnect）
wb = loadWorkbook("test.xlsx", create = TRUE)
createSheet(wb, name = "mtcars")
writeWorksheet(wb, mtcars, sheet = "mtcars")
for(i in 1:5) appendWorksheet (wb, mtcars, sheet = "mtcars", header = FALSE)
保存工作簿（wb）