批量导入数据,代码如下图所示: 用了sep="t",stringsAsFactors=FALSE还是没有用
micepath <- "E:/C35/"
micefiles <- list.files(micepath, pattern = "*.dat", full.names = TRUE)
#length(micefiles)
files=list()
for (i in 1:length(micefiles)){
dat_i=read.table(micefiles[i],header=F,sep="t",stringsAsFactors=FALSE,fill=T)
files[i]=dat_i
}
运行结果如下: 所有的数字都串在了一起 没有分列