找到了一种R的方法，不知道对不对，如果不对，老师是否有代码能够打开或者拆分大的txt文件？大概5G
这段代码，有个问题，就是filename这里是否要改成自己的文件名？eachfile_lines_num这里呢？就这样放着，还是改成一个数值？
file_split <- function(filename,eachfile_lines_num) #建立函数
c <- file(filename,"r") #建立链接
varnames <- paste("splitfile", 1:1000, sep = "_") #建立尽可能多但不要太多的动态变量名
i <- 1 #初始值
while(TRUE){
assign(varnames[i],value = readLines(c,n = eachfile_lines_num)) #分别把从filename中读出来的数据存放在变量中
write.table(get(varnames[i]),paste(varnames[i],".txt",sep = "")) #分别把存放在变量中的数据写出到文件中
if (length(get(varnames[i])) < eachfile_lines_num) break
else i <- i + 1 #判断循环停止条件
}
return(
