如何合并列表中包含的不同大小的数据帧元素[R]?

时间:2015-03-06 14:22:25

标签: r merge lapply

我有一个由5 data.frames个不同大小组成的列表,每个data.frame有两个变量,Group.1x,我想合并这些data.frames通过Group.1个变量。当然,我希望生成NA个值。

示例:

Group.1 = c(01, 03, 05) 
x = c(2000, 4000, 5000) 
a <- data.frame(Group.1, x)

Group.1 = c(03, 05) 
x = c(400, 500) 
b <- data.frame(Group.1, x)

Group.1 = c(01, 05) 
x = c(2000,2500) 
c <- data.frame(Group.1, x)

lst <- list(a,b,c)

variables <- as.numeric(c(1:3))
test2 <- lapply(variables, function(t) merge((data.frame(lst[t])), by="Group.1"))

额外注意事项:我想使用apply(或lapply)来测试不同的列表大小。

非常感谢!

1 个答案:

答案 0 :(得分:3)

Reduce()可与列表中的merge()很好地配合使用。

Reduce(function(...) merge(..., by = "Group.1", all = TRUE), lst)
#   Group.1  x.x x.y    x
# 1       1 2000  NA 2000
# 2       3 4000 400   NA
# 3       5 5000 500 2500