如何用R实现循环保存？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

现在手头上有一个数据样本，共3650000个数据，想将其分割成100个样本文件，分别命名为x1.txt, x2.txt, x3.txt……其中x1.txt由第1~36500个数据组成；x2.txt由第36501~73000个数据组成，依此类推。觉得R处理这个问题应该挺简单的，不过编程过程中还是遇到了问题。程序代码如下：
for (i in 1:100)
{
j=(i-1)*36500+1
k=i*36500
for(l in j:k)
{
y[[l]]=x[[l]]
}
file=paste("y",i,".txt",sep="")
write.table(y,file,append=FALSE,sep="                 ")
}

输出结果没按照我事先设想的输出，不知道是什么原因？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R实现 如何用 append paste write 保存

Something's wrong with the inner loop. In your script, y will be eventually assigned the same as x. I assume the results will be the first file has the first 1% of the data, the second has the first 2%,...

Actually you may not need the inner loop at all. Consider the following code:

1. 
   
2. for (i in 1:100)
   
3. {
   
4. j=(i-1)*36500+1
   
5. k=i*36500
   
6. file=paste("y",i,".txt",sep="")
   
7. write.table(x[[j:k]],file,append=FALSE,sep="                 ")
   
8. }

复制代码

Thank you so much for your advice~~I will try your code on my computer

经检验 您提供的代码错误：
错误于x[[j:k]] : 最多只能选择一个元素。。。

应该将x[[j:k]] 改为x[j:k]，这样就能达到目的了。
Thank you all the same:)

在write里面用paste可以实现

file=paste("data", i,"txt")