读入 CSV 文件并添加带有文件名的列

Question

假设您有 2 个文件，如下所示。

file_1_october.csv
file_2_november.csv

文件具有相同的列。所以我想在 R 中读取这两个文件，我可以使用 map 轻松完成。我还想在每个读取文件中包含一列 month 和文件名。例如，对于 file_1_october.csv，我想要一个名为“month”的列，其中包含单词“file_1_october.csv”。

为了可重复性，假设 file_1_october.csv 是

name,age,gender
james,24,male
Sue,21,female

虽然 file_2_november.csv 是

name,age,gender
Grey,24,male
Juliet,21,female

我想读取这两个文件，但在每个文件中都包含一个与文件名相对应的月份列；

name,age,gender,month
james,24,male, file_1_october.csv
Sue,21,female, file_1_october.csv

和

name,age,gender,month,
Grey,24,male, file_2_november.csv,
Juliet,21,female, file_2_november.csv

Answer 1

也许是这样的？

csvlist <- c("file_1_october.csv", "file_2_november.csv")

df_list <- lapply(csvlist, function(x) read.csv(x) %>% mutate(month = x))

for (i in seq_along(df_list)) {
  assign(paste0("df", i), df_list[[i]])
}

这两个数据帧将保存在df1和df2中。