[R 實作] 多份Excel 一次讀取、合併與匯出
最近因工作上的需求(小弟目前在製造業),
老闆要我把量測儀器內新製程的數據拉個趨勢圖來看看,
但問題來了,一想到幾千筆Excel要複製貼上到一份Excel (眼神死
不然... 來寫 R 吧 !
首先在合併前須注意以下幾點:
1. 每份資料呈現方式相同 (ex: 變數數量、欄位順序...等等)
2. 欲選取的資料位置相同 (ex: 目標資料都在第3列)
3. 上述都確認後,將檔案另存為 .CSV檔
接著,選擇要合併資料的存放路徑,
假設放在 C:/rdata/sam/
R script 第二行 files 代表每份檔案的路徑
讀取及合併資料由for迴圈完成
cat 為想匯出的檔案,file = "cat.csv"為檔案名稱
老闆要我把量測儀器內新製程的數據拉個趨勢圖來看看,
但問題來了,一想到幾千筆Excel要複製貼上到一份Excel (眼神死
不然... 來寫 R 吧 !
首先在合併前須注意以下幾點:
1. 每份資料呈現方式相同 (ex: 變數數量、欄位順序...等等)
2. 欲選取的資料位置相同 (ex: 目標資料都在第3列)
3. 上述都確認後,將檔案另存為 .CSV檔
接著,選擇要合併資料的存放路徑,
假設放在 C:/rdata/sam/
R script 第二行 files 代表每份檔案的路徑
path <- "C:/rdata/sam/"
files <- list.files(path = path, pattern = "*.CSV")
新增2個空白的data.frame (df1和df2),之後合併的資料存放用讀取及合併資料由for迴圈完成
df1 <- data.frame()
df2 <- data.frame()
for(file in files) {
df1 <- read.csv(paste(path, file, sep=""))
df2 <- rbind(df2, df1)
}
最後透過 write.csv 匯出Excelcat 為想匯出的檔案,file = "cat.csv"為檔案名稱
write.csv(cat, file = "cat.csv")
Error in is.data.frame(x) : object 'taxi' not found
回覆刪除不好意思請問匯出的檔案要怎麼定義
謝謝
超簡潔 great
回覆刪除