我有一个大小均匀的字符向量列表,我希望将它们有效地组合成一个数据帧,列表中的向量将成为新数据帧的行。在下文中,ls
是我的列表,df
是我预先分配的数据框。
ls <- list(c("r1c1", "r1c2", "r1c3"),
c("r2c1", "r2c2", "r2c3"))
df <- data.frame(col1 = character(), col2 = character(), col3 = character(),
stringsAsFactors = F)
# Desired Result:
col1 col2 col3
1 r1c1 r1c2 r1c3
2 r2c1 r2c2 r2c3
截至目前,我已尝试rbind(df, ls)
,它似乎按列创建新数据框,以便df
看起来像:
c..r1c1....r1c2....r1c3.. c..r2c1....r2c2....r2c3..
4 r1c1 r2c1
5 r1c2 r2c2
6 r1c3 r2c3
我还尝试在for循环中执行rbind
:
for (i in 1:length(ls))
df <- rbind(df, ls[[i]])
然而,这给了我警告信息:invalid factor level, NA generated
,即使我最初将stringsAsFactors
设置为false。当Rbind在较大的列表上不断执行时,似乎也是一个缓慢的过程,所以我希望尽可能减少它的使用。
非常感谢任何帮助。
答案 0 :(得分:5)
您可以使用
data.frame(do.call(rbind, ls))
是一种快速简单的方法,可以将矢量列表转换为矩阵,然后转换为data.frame