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刪除。