如何将结果导出到R中excel的不同选项卡上

我有多个数据框，我想导出到excel / csv文件的不同选项卡。 我将把我的15个dataframe分成三组，每组五个。 这样，我将有三个Excel表单与五个不同的选项卡，而不是15个人的Excel表单。

导出为ex​​cel：

#fake data data_1<-data.frame(c(03,23,4,2)) data_2<-data.frame(c(0223,3,1,2)) data_3<-data.frame(c(0232,3,1,1)) data_4<-data.frame(c(21,23,5,6)) data_5<-data.frame(c(24,5,6,7)) #fake names mydatasets<-c(data_1,data_2,data_3,data_4,data_5) mytitles<-c("data1", "data2", "data3","data4", "data5") #for loop to write out individual csv files for (i in 1:5)) { a <- mydatasets[i] title<-mytitles[i] myfile <- paste0(title, "_", ".csv") write.csv(a, file = myfile) } 

如何获得上述代码将这些CSV文件合并到一个CSV文件或Excel文件的多个选项卡？

Answer 1

CSV文件只包含一个表格。 另一种方法是写入XLSX。 函数xlsx::write.xlsx需要参数sheetName ：

 library(xlsx) # Use data from the question for (i in seq_along(mydatasets)) { write.xlsx(x = mydatasets[i], file = "myfile.xlsx", sheetName = mytitles[i], append = TRUE) } 

注意append = TRUE以避免覆盖文件而不是附加表单。

xlsx包依赖于rJava 。 第一次使用该软件包有时会造成麻烦 – 请参阅此问题以获取常见解决scheme。