使用R语言批量修改文件名的方法

这篇文章主要介绍了使用R语言批量修改文件名的方法,本文给大家介绍的非常详细，对大家的学习或工作具有一定的参考借鉴价值，需要的朋友可以参考下

在R语言默认目录下有一文件夹test，其下有三个文件，分别是test1.txt， text2.txt, text3.txt，现在要对这三个文件进行批量的修改。主要使用到了for 循环和sub()字符替换函数。思路是先通过list.files()函数将test文件夹下面的三个文件名读至变量，然后通过for循环来实现批量修改文件名。

1. 修改文件扩展名

				?

									folder<-setwd('~/test')

									files<-list.files(folder)

									 for (f in files){

									 newname<-sub(".txt",'.xls',f)

									 file.rename(f,newname)

									}

									dir()

显示结果：

[1] "text1.xls" "text2.xls" "text3.xls"

2. 删除文件扩展名

				?

									folder<-setwd('~/test')

									files<-list.files(folder)

									 for (f in files){

									 newname<-sub('.xls','',f)

									 file.rename(f,newname) 

									}

									dir()

显示结果：

[1] "text1" "text2" "text3"

3. 增添文件扩展名

这里我们用到一个正则表达式，用‘$'代替字符的尾部，将字符尾部替换为'.doc'

				?

									folder<-setwd('~/test')

									files<-list.files(folder)

									 for (f in files){

									 newname<-sub('$','.doc',f)

									 file.rename(f,newname)

									}

									dir()

输出结果：

"text1.doc" "text2.doc" "text3.doc"

4. 修改文件名中的字符

				?

									folder<-setwd('~/test')

									files<-list.files(folder)

									  for (f in files){

									  newname<-sub('xt','ab',f) #将原文件中的字符xt，替换为字符ab

									  file.rename(f,newname)

									}

									dir()

输出结果：

[1] "teab1.doc" "teab2.doc" "teab3.doc"

5. 删除文件名中的数字

把实验目录下的文件分别修改为tab.doc,teb.doc, tdb.doc，用“\\d”正则表达式代替文件中的数字。

				?

									folder<-setwd('~/test')

									files<-list.files(folder)

									 for (f in files){

									 newname<-sub('\\d','',f) 

									 file.rename(f,newname)

									}

									dir()