如何读取多个txt文件并将它们保存为相应的对象名称?

时间:2017-12-06 21:09:46

标签: r

我有数百个.txt个文件。我想自动化一个进程来读取所有进程并使用各自的文件名保存它们。例如,我想按此顺序保存它们而不键入单个文件的名称。

mytext1.txt <-read.table("./mytext1.txt", sep = "\t")
mytext2.txt <-read.table("./mytext2.txt", sep = "\t") 

这是我尝试过的代码,当然不会将数据框保存在单独的对象名中。

filelist = list.files(pattern = ".*.txt")   
datalist = lapply(filelist, FUN=read.table, header=TRUE, sep = "\t")

2 个答案:

答案 0 :(得分:0)

看起来你错过了一条线:

var date = moment(yourDate).format('YYYY-MM-DD');

请参阅此帖子以供参考:How do you read in multiple .txt files into R?

答案 1 :(得分:0)

这可能不是最好的方法,但它应该做你想做的事情:

read.and.write.table <- function(files){
    for(fn in files){
        input <- read.table(file = fn, header = TRUE, sep = "\t")
        assign(x = fn, value = input, envir = .GlobalEnv)
    }
}

filelist = list.files(pattern = ".*.txt")  
read.and.write.table(filelist)

将创建以.txt文件命名的单独全局变量。当然,你可以包含一些字符串操作来提升名称。