合并R中的两个列表（多对多关系）答案

【问题标题】：merging two lists in R (many-to-many relationship)合并R中的两个列表（多对多关系）
【发布时间】：2014-08-18 05:53:46
【问题描述】：

我正在尝试在 R 中合并 2 个列表。列表的名称应该用于执行连接。这是一个玩具示例：

> list1 <- list(A=c(1,2,3), B=c(2,4,5,6), C=c(1,3))
> list2 <- list(A=c(w,x), B=c(y,z))

最终的合并列表应如下所示：

$w
[1] 1 2 3
$x
[1] 1 2 3
$y
[1] 2 4 5 6
$z
[1] 2 4 5 6

到目前为止，我唯一的想法是将列表转换为数据框，并使用合并功能。有什么更简单的方法吗？

非常感谢您的帮助。

【问题讨论】：

你能展示你的尝试吗？
等等，w、x、y 和 z 是什么？正如您在那里写的那样，是列表中包含的对象的名称，而不是列表中元素的名称。

标签： r list join merge

【解决方案1】：

希望这和你想要的一样吗？事实上你根本不需要list2。因为列表实际上是向量，所以我们可以使用命名向量来“查找”我们需要的 list1 的值，然后将这些名称分配给新列表

list1 <- list(A=c(1,2,3), B=c(2,4,5,6), C=c(1,3))

lookup <- c(w = "A",x = "A",y = "B",z = "B")

list2 <- list1[lookup]

names(list2) <- names(lookup)

list2
$w
[1] 1 2 3

$x
[1] 1 2 3

$y
[1] 2 4 5 6

$z
[1] 2 4 5 6

【讨论】：

谢谢安德鲁。这是一个很好的解决方案！