根据列表将文件从一组目录复制并重命名为另一组目录

Question

我正在开发一个程序，将数千个原始文件从一组目录复制到另一组目录，并根据我创建的密钥重命名每个文件。该键包含列出旧目录，oldfilename，新目录和新文件名的列。以下是我的代码试图实现这一点。用于复制文件的嵌套for循环似乎有效，但它将所有文件复制到每个目录中，而不是仅将它们复制到列出的新目录。

for (file in newfilename) {
  for (dir in newdirectory) {
    for(newname in newfilenames) {
      for(oldname in oldfilenames) {
        file.copy(file, dir)   
        file.rename(from = file.path(dir, oldname), to = file.path(dir, newname))
      }}}}