在R中，如何创建一个循环来分割数据帧中的列

Question

在R中，我想创建一个循环，它将我的数据框的前3000列写入一个文件，将下一个3000列写入另一个文件等等，直到所有的列都被分开为止。什么是最好的方法来做到这一点？我明白现在通过CRAN可以使用isplit和iterators函数，但我真的不确定如何去做这件事。有什么建议吗？

Answer 1

你可以尝试这样的：

library(plyr) 
max.col <- ncol(x) 
l_ply(seq(1, max.col, by=3000), function(i) 
    write.table(x[,i:min(i+2999, max.col)], file=paste("i", i, sep="-")) 
) 

Answer 2

不知道为什么你会懒得装plyr ......假设你的数据帧DF ...（从巴蒂尔的回答偷明智地使用分钟（）的）

maxCol <- ncol(df) 
for (i in seq(1, maxCol, by 3000)) { 
    write.table(df[,i:min(i+2999, maxCol)], "i") 
} 

您可能想要编辑上面的write.table命令以添加您的首选格式。