批量读取本地文件

最新推荐文章于 2021-08-20 17:00:28 发布

weixin_30915275

最新推荐文章于 2021-08-20 17:00:28 发布

阅读量102

点赞数

原文链接：http://www.cnblogs.com/Martin-9/p/5311117.html

版权

doc.names <- dir("path") 
doc.path <- sapply(doc.names,function(names) paste(path,names,sep='/'))
doc <- sapply(doc.path, function(doc) readLines(doc))


doc.names <- dir("F:/5分钟报价1")          #读取目录内文件名称
FileName <-data.frame(gsub("\\.xlsx","",doc.names),paste("F:/5分钟报价1",doc.names,sep='/'))        #去除文件名类型 加上 文件路径 生成文件路径数据框

转载于:https://www.cnblogs.com/Martin-9/p/5311117.html