使用R寫入Excel方法總結

數據部門在和公司其他部門打交道過程中，將數據寫入Excel文件經常會涉及到（從各種臨時需求到日常數據報告Dashboard等等）。

通過 Rdocumentation 查詢write to excel，會有15個R包、25個具體函數可能相關，如下圖：

我們有很多選擇能完成寫入Excel文件任務，本文推薦兩個在實踐中較常用的R包：xlsx包和XLConnect包。這兩個包作者都是通過Java來寫入Excel文件，所以性能相對比較穩定。

那我們來看下這兩個包的具體示例：

xlsx包

首先，創建數據集：

sample.dataframe

如果你Excel文件沒有創建，則可以直接將數據寫入到新Excel文件中：

library(xlsx) #load the package
write.xlsx(x = sample.dataframe, file = "test.excelfile.xlsx",
        sheetName = "TestSheet", row.names = FALSE)

如果Excel文件已經存在，則可以寫入數據到新的sheet，或者直接寫到現有的sheet中，如workbook.sheets workbook.test ：

addDataFrame(x = sample.dataframe, sheet = workbook.test,
   row.names = FALSE, startColumn = 4) # 從第一行、第四列寫入數據
saveWorkbook(workbook.sheets, "test.excelfile.xlsx") #保存文件

XLConnect包

第一步：制作Excel模版文件

library(XLConnect) #load the package
ExcelFile <- "/home/linux/scoreCard-new/DailyScoreCard_20160307.xls"  ## 模版
template <- paste0("/home/linux/scoreCard-new/ResultOutput/DailyScoreCard_",Sys.Date()-1,".xls") ## 文件名
file.copy(ExcelFile, template) ## 拷貝模版文件

第二步：寫入數據到Excel

writeWorksheetToFile(template, data=data_frame,
                     sheet="sheet1",header = F,startRow=4, startCol = 2)## 從第四行、第二列寫入模版文件中sheet1表