如何将矢量列表添加到预分配的data.frame,以便矢量形成data.frame的行?
例如。
ll<-list(c(1,2,3),c(2,3,4))
dd<-data.frame(matrix(nrow=10,ncol=3))
我需要dd看起来像
1 2 3
2 3 4
答案 0 :(得分:12)
do.call(rbind, ll)
添加到现有数据框
rbind(dd, do.call(rbind, ll)
# OR
do.call(rbind, c(ll, list(dd))
如果您对许多数据框执行此操作,请参阅rbind.fill
包中的plyr
以获得更有效的方法。
答案 1 :(得分:6)
这个问题有些奇怪:你构造了一个10行的数据帧,填充了NA值,但你需要dd只有2行。
首先回答你的问题:有时候明显的问题不是解决方案。
ll<-list(c(1,2,3),c(2,3,4))
dd<-data.frame(matrix(nrow=5,ncol=3))
for(i in 1:length(ll)){
dd[i,] <- ll[[i]]
}
dd
如果你正盯着丑陋的for循环:这是一个你可以实际使用for循环而没有问题的情况。但是这使得dd具有大量的NA值。如果您想摆脱它们,可以将数据框初始化为
dd<-data.frame(X1=numeric(0),X2=numeric(0),X3=numeric(0))
为您提供空数据框,或者使用complete.cases()删除所有NAs:
dd <- dd[complete.cases(dd),]