r读取文件夹下的所有csv文件_利用R一次性读取一个文件夹里的文件

今天碰到一个问题，要加载一个文件夹的文件，并且转存成csv格式，特将处理方法做个记录，代码如下setwd("F:\\ddlc\\回款(回测使用)\\")

for(i in dir()[1:6]){

a

load(i)

nf$发放时间

write.csv(nf,file = paste0(a,'.csv'),row.names = FALSE,fileEncoding = 'gbk')

}

做个简单介绍

1.setwd("F:\\ddlc\\回款(回测使用)\\") #将工作文件夹设定为函数里面的路径

2.

dir()函数会将setwd所设置的文件夹里的所有文件名给获取到，比如我的文件夹里的文件是酱汁的

dir函数会返回如下结果，因为我只需要前6个，所以dir()[1:6]

3.应该是我这次最大的收获

本来我的for循环代码是这样子的for(i in dir()[1:6]){

load(i)

nf$发放时间

write.csv(nf,file = paste0(substr(i,1,10),'.csv'),row.names = FALSE,fileEncoding = 'gbk')

}

但是我发现当运行了load(i)之后，i变量就不是文件名了，比如本来i应该是"2018-05-28.RData"，到nf$发放时间

这一句的时候会变成2373,这个不知道是为啥(如果知道原因的小伙伴请告诉我一下哈，先谢谢啦)，所以在load前面就先将i的结果保存下来,于是就有了在load前弄个变量a。

其他的都挺简单的