R-如何在组内找到变量对组合

我需要创建一个网络，其中参与者之间的关系由一个组变量表示。我的意思是，在我的例子中，a和b是并列的，因为它们属于第1组。我需要以网络矩阵的形式表示这些联系，正如预期的输出所表示的那样。输出应包含同一组中的对的组合

输入：

实体 团体 A. 1. B 1. C 2. D 2. E 2.

---

我们可以使用

combn

按“组”分组

library(dplyr)
library(tidyr)
df1 %>% 
   group_by(Group) %>% 
   summarise(out = list(combn(Entity, 2, simplify = FALSE)),
       .groups = 'drop') %>% 
   unnest(c(out)) %>% 
   unnest_wider(c(out))

数据

df1@calozanoc请检查
df1 <- structure(list(Entity = c("a", "b", "c", "d", "e"), Group = c(1, 
1, 2, 2, 2)), class = "data.frame", row.names = c(NA, -5L))