r - 如何使用矩阵在R中显示关系？

Question

我在这里有一个列表 x：

我想展示元素之间的关系，如下所示：

谁能告诉我如何在 R 中做到这一点？非常感谢你！

Answer 1

首先，从原始列表中构建所有对的矩阵：

L <- list(c("John", "Mary", "Jack"), c("John", "Wendy"), c("Mary", "Wendy"))
x <- matrix(unlist(lapply(L, combn, 2, simplify = FALSE)), ncol = 2)

然后，使用此处显示的方法之一：R 中的成对交互矩阵。我喜欢使用图论工具的那个:-)

library(igraph)
g <- graph.edgelist(x, directed = FALSE)
get.adjacency(g)

#       John Jack Mary Wendy
# John     0    1    1     1
# Jack     1    0    1     0
# Mary     1    1    0     1
# Wendy    1    0    1     0