Question

尝试从工作表中读取Excel数据并将基于不同逻辑的数据拆分为多个数据帧。需要使用R将这些多个数据帧写入不同工作表中的相同Excel工作表。请使用这些包的示例包或示例代码。

Answer 1

要阅读excel文件，请阅读以下文章：Read an Excel file directly from a R script

要创建多个工作表excel文件， xlsx 包可能会有所帮助。以下函数采用文件名，工作表名称向量和数据框对象名称。注意为数据框对象参数提供相等大小的向量。

save2.xlsx <- function (file, namelist, ...)
 {
  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 = namelist[i])
      else write.xlsx(objects[[i]], file, sheetName = namelist[i],
          append = TRUE)
  }
}

示例电话：

 mydf1<- data.frame(matrix(data=rnorm(4),ncol=2,nrow=2))
 mydf2<- data.frame(matrix(data=rnorm(9),ncol=3,nrow=3))
 save2.xlsx("C:\\myfile.xls",c("Mysheet1", "Mysheet2"),mydf1, mydf2 )

如何编写不同的数据帧来分离R中的excel工作表

1 个答案: