我有数百个.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")
答案 0 :(得分:0)
看起来你错过了一条线:
var date = moment(yourDate).format('YYYY-MM-DD');
答案 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文件命名的单独全局变量。当然,你可以包含一些字符串操作来提升名称。