用for循环来做吧,如果你是要每个文件一个变量的话。
filename <- list.files()
for (i in 1:length(filename)){
var_name <- gsub('.txt','',filename[i])
assign(var_name,read.table(filename[i],sep=',',header=TRUE)
}
如果你想批量放进一个list里面,
直接用
data_list <- lapply(filename,read.table,sep=',',header=TRUE)


雷达卡





京公网安备 11010802022788号







