需求：有n個Excel文件，每個文件包含表的數量不等，但全部表都有表名，并是根據同一的規范命名，比如與悟空有關的數據，存放在《悟空》表中，現在需要按表名對所有數據分類匯總

library(readxl) library(data.table) library(tidyverse) library(writexl) library(tidyxl) setwd("d:/cloud") # 將目錄下所有文件名存入變量 (fl <- list.files()) # 選取需要的文件名 (bdl <- fl[!str_detect(fl,"檔案|綜合分析|csv")]) # 最終結果存放的變量result中 result <- list() ## 循環一：將excel讀入內存 for(j in 1:length(bdl)){bdt <- list()for (sheet in excel_sheets(bdl[j])){bdt[[sheet]] <- read_excel(bdl[j],sheet = sheet,col_types = 'text',col_names = FALSE)} ## 按表名分類保存到結果集，else語句是關鍵for(nm in names(bdt)){if (nm %in% names(result)){result[[nm]] <- rbind(result[[nm]],bdt[[nm]])}else{result[[nm]] <- bdt[[nm]]}} }

總結

以上是生活随笔為你收集整理的R语言批量导入Excel文件并按表分类汇总的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。