我有一个由5 data.frames
个不同大小组成的列表,每个data.frame
有两个变量,Group.1
和x
,我想合并这些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)来测试不同的列表大小。
非常感谢!
答案 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