導入合並多個.csv文件，創建多個dataframes

Question

我在一個文件夾中有多個.csv 文件，我想將這些文件組合成多個數據幀。 我已經可以使用以下代碼對一組文件執行此操作：

DF_week1 <- list.files(path = 'x:/full/file/path', 
pattern = "^Dai15E_ABC_10mbin_20211201_fullwatercolumn_evening_BNR*.*_week1.csv", full.names = TRUE) %>%
  map_dfr(read_csv)

對於大約 5 周的數據，我有這樣的標准文件名。 我想做的是做一個循環。 例如，第一批文件名以“week1”結尾，下一組以“week2”結尾。 我正在嘗試編寫一些能夠識別“周”之后的數字已經改變的東西，現在將這些.csv 文件合並到一個新的數據框（DF_week2、DF_week3 等）中。 不幸的是，我有點卡在這里，而且對循環很陌生。

Answer 1

您可以在讀取數據幀后將它們存儲在列表中，並設置一個簡單的 for 循環：

n = 10 # fill with number of weeks
file_list = list()

for (i in seq(n)) {
  file_list[[i]] <- list.files(path = 'x:/full/file/path', 
pattern = str_c("^Dai15E_ABC_10mbin_20211201_fullwatercolumn_evening_BNR*.*_week", i, ".csv"), full.names = TRUE) %>%
  map_dfr(read_csv)
}