myfilepath <- "F:/paper2/climateExposure/wjj_mec/second/paths/"
setwd(myfilepath)
alltypefiles = dir(myfilepath)
newname = gsub(pattern = 'paths.',replacement = 'paths_',x = alltypefiles)
file.rename(alltypefiles,newname)
myfilepath <- "F:/paper2/climateExposure/wjj_mec/second/paths/"
setwd(myfilepath)
alltypefiles = dir(myfilepath)
newname = gsub(pattern = 'paths.',replacement = 'paths_',x = alltypefiles)
file.rename(alltypefiles,newname)
本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。