如何使用新名称列表重命名文件

Question

我需要帮助来使用新名称列表重命名目录中的文件，我已经尝试了一些已在此处发布的建议，但它们不起作用 .-(。文件的模式是： FRAGMSAUERGUERTH279_X_A01_015.fsa 直到 X 它是一个常量字符，我想将它们更改为我已经上传到文件中的特定名称。
这是我的脚本：

plate1<-(plate.1.anser) # new names in plate1    
dir1<-('D:/Doctorado/Anseriformes/Multiplex PCR anser/Micro geese 2015/fragmsauerguerth279/fragmsauerguerth279') # where my files are
filez<-list.files(dir1,pattern="*.fsa")
head(filez)     
apply(filez,FUN=function(eachPath){
  file.rename(from=eachPath,to=sub(pattern="*.fsa",replacement=plate1,eachPath))  #replacement=plate1[1,]:plate1[96,]    
})

Answer 1

我找到了解决办法 .-):

 plate1<-as.vector(plate.1.anser)
 dir1<-("D://Doctorado//Anseriformes//Multiplex PCR anser//Micro geese 2015//fragmsauerguerth279//fragmsauerguerth279//")
 a <- list.files(dir1, pattern="*.fsa")  
 b <- paste(plate1[1:96,], ".fsa", sep = "") # 96 files in directory
 file.rename(from=file.path(dir1,a), to=file.path(dir1,b))

如何使用新名称列表重命名文件

How to rename files using a list of new names

rename

file

list