将两个列表之间的data.frames合并为一列

时间:2017-03-16 22:03:14

标签: r list dataframe merge col

这是我的两个列表和data.frames的示例:

df1 = data.frame(a = c(1,2,3,4,5,6,7))
df2 = data.frame(a = c(111,112,113,114))

lst1 = list(df1, df2)

df3 = data.frame(a = c(1,2,3,4,5,6,7,8,9,10), b = c(10,11,12,13,14,15,16,17,18,19))
df4 = data.frame(a = c(111,112,113,114,115,116,117,118,119), b = c(22,23,24,25,26,27,28,29,30))

lst2 = list(df3, df4)

我需要将lst1lst2列合并到a列,以便df1df3df2合并df4 1}}。

这是我想要的输出:

> output_lst
[[1]]
   a  b
   1 10
   2 11
   3 12
   4 13
   5 14
   6 15
   7 16

[[2]]
    a  b
1 111 22
2 112 23
3 113 24
4 114 25

我对lapplyMap进行了很多尝试,但没有结果。 感谢

2 个答案:

答案 0 :(得分:3)

它只是:

Map(merge, lst1, lst2)
#or more explicitly
Map(merge, lst1, lst2, by="a")

Map基本上是一个美化循环:

merge(lst1[[1]], lst2[[1]], by="a")
#and
merge(lst1[[2]], lst2[[2]], by="a")

答案 1 :(得分:1)

试试这个:

sapply(seq_len(length(lst1)), 
       function(i) list(merge(lst1[[i]], lst2[[i]], by = "a", all.x=TRUE)))

# [[1]]
  # a  b
# 1 1 10
# 2 2 11
# 3 3 12
# 4 4 13
# 5 5 14
# 6 6 15
# 7 7 16

# [[2]]
    # a  b
# 1 111 22
# 2 112 23
# 3 113 24
# 4 114 25