需求:books文件夹下有xxx.001.zip格式的文件需要去掉.zip后缀
实现:
实现:
folder <- "c:/books"
files <- list.files(folder)
for(f in files){
newname <- sub('\\.zip','',f)
file.rename(paste0(folder,'/',f),paste0(folder,'/',newname))
}