使用列中的信息重命名多个 csv 文件名

Question

有许多老师在csv列中填写了他们的信息，但是，这些csv文件被标记为不规则的名称（例如，1.csv、apple school.csv、003.csv等）。

这些文件包含相同的列（id、分数、年级、班级、学校、城市）

我想用常规方式重命名 csv 文件，并一次性使用它们在列中填写的内容， 例如“1A_S_L.csv” 那么我就认出这个文件是来自L市S学校1A的老师

非常感谢您的帮助。

Answer 1

将输入文件放入名为 in 的文件夹中，创建一个名为 out 的空文件夹。
然后类似这样的事情将循环 in 中的文件，并将它们复制到 out 中的文件，其名称基于 grade、class、学校和城市：

for (file_in in dir("in", full.names = TRUE)) {
  df <- read.csv(file_in)
  filename <- paste(df[1,"grade"], df[1,"class"], df[1,"school"], df[1,"city"], sep = "_")
  file_out <- paste0("out/", filename, ".csv")
  print(file_out)
  write.csv(df, file_out)
}