使用R和表/数据框创建每张表一个数据的Excel文件

时间:2018-06-08 17:45:28

标签: r excel

我试图创建一个用于统计研究的excel文件,每张表有一个URL - 表的名称无关紧要,可以是1,2,3或A,B,C)。

首先,我已经使用我的所有网址创建了一个数据框。在我使用这个脚本来帮助我之后:

save.xlsx <- function (file, ...)
  {
      require(xlsx, quietly = TRUE)
      objects <- list(...)
      fargs <- as.list(match.call(expand.dots = TRUE))
      objnames <- as.character(fargs)[-c(1, 2)]
      nobjects <- length(objects)
      for (i in 1:nobjects) {
          if (i == 1)
              write.xlsx(objects[[i]], file, sheetName = objnames[i])
          else write.xlsx(objects[[i]], file, sheetName = objnames[i],
              append = TRUE)
      }
      print(paste("Workbook", file, "has", nobjects, "worksheets."))
}

之后:

save.xlsx("myworkbook.xlsx", mtcars, Titanic, AirPassengers, state.x77)

来源:https://statmethods.wordpress.com/2014/06/19/quickly-export-multiple-r-objects-to-an-excel-workbook/

但我有错误而且无法正常工作......

我还尝试将值与c("URL1", "...", "URLn")合并为一个矢量。我想我已经接近了,但需要帮助。

我可以使用这种&#34;技巧&#34;?

write.xlsx(df$sheet1, file = "myfile.xlsx", sheetName="sh1", append=TRUE)
write.xlsx(df$sheet2, file = "myfile.xlsx", sheetName="sh2", append=TRUE)
write.xlsx(df$sheet3, file = "myfile.xlsx", sheetName="sh3", append=TRUE)

我也想不通,如何正确使用createSheet功能来自动完成我想做的事情。

由于 甲

0 个答案:

没有答案