背景:

想要實現(xiàn)一個功能, 將不同的數據寫入一個Excel中, 不同的數據對應不同的sheet表, 看了一下R語言, 找到的解決方法如下.

測試思路

• 模擬兩個數據框

• 新建一個list表

• 寫入excel中

代碼

aa<-data.frame(1:5,2:6)ab<-data.frame(2:60,13:71)library(openxlsx)sheets = list("sheet1"=aa,"sheet2"=ab)write.xlsx(sheets,"d:/ex.xlsx")

結果

感想:

最近發(fā)現(xiàn), R語言中的list更好用, 我的R語言水平感覺要進步一個臺階了...

運用R語言的list示例:

需求描述: 現(xiàn)在有3個Excel, 想把這些Excel合并到一個Excel中的不同sheet表中, 如何實現(xiàn)?

根據糙快猛的解決方案, 新建一個Excel, 將這三個Excel的內容復制進去, 保存, 退出完成.

如果有90個Excel呢? 這就突出編程的效果了.

解決問題思路:

1, 使用dir函數, 返回文件名的集合

2, 新建一個list, 賦值為空NULL

3, 寫一個for循環(huán), 循環(huán)讀入, 并保存到list中

4, 對list重命名

代碼如下:

打開結果:

搞定!