使用R在每个组内创建组合子组的变量

使用R在每个组内创建组合子组的变量,r,dplyr,group-by,R,Dplyr,Group By,我有一个如下方式的数据帧: dat <- data.frame(v1=c("A", "A", "B", "B", "C", "C", "C","C"), v2=c("G1","G1","G1","G2","G1","G3&q

我有一个如下方式的数据帧:

dat <- data.frame(v1=c("A", "A", "B", "B", "C", "C", "C","C"), v2=c("G1","G1","G1","G2","G1","G3","G3","G4"))
  v1 v2 which_subgroups
1  A G1 "G1"
2  A G1 "G1"
3  B G1 "G1, G2"
4  B G2 "G1, G2"
5  C G1 "G1, G3, G4"
6  C G3 "G1, G3, G4"
7  C G3 "G1, G3, G4"
8  C G4 "G1, G3, G4"
下面是一个使用dplyr包和粘贴的解决方案

图书馆弹琴 dat%>% 组_按v1%>% mutatesub_group=pastesortuniquev2,collapse=, >一个tibble:8x3 >分组:v1[3] >v1 v2亚组 > >1 A G1 G1 >2 A G1 G1 >3BG1G1G2 >4 B G2 G1,G2 >5 C G1、G3、G4 >6 C G3 G1、G3、G4 >7 C G3 G1、G3、G4 >8 C G4 G1、G3、G4 由v2.0.0于2021年5月26日创建,以下是使用dplyr软件包和粘贴的解决方案

图书馆弹琴 dat%>% 组_按v1%>% mutatesub_group=pastesortuniquev2,collapse=, >一个tibble:8x3 >分组:v1[3] >v1 v2亚组 > >1 A G1 G1 >2 A G1 G1 >3BG1G1G2 >4 B G2 G1,G2 >5 C G1、G3、G4 >6 C G3 G1、G3、G4 >7 C G3 G1、G3、G4 >8 C G4 G1、G3、G4 于2021年5月26日通过v2.0.0创建

dat 1 A G1 >2 A G1 G1 >3BG1G1G2 >4 B G2 G1,G2 >5 C G1、G3、G4 >6 C G3 G1、G3、G4 >7 C G3 G1、G3、G4 >8 C G4 G1、G3、G4 于2021年5月26日通过v2.0.0创建

dat 1 A G1 >2 A G1 G1 >3BG1G1G2 >4 B G2 G1,G2 >5 C G1、G3、G4 >6 C G3 G1、G3、G4 >7 C G3 G1、G3、G4 >8 C G4 G1、G3、G4 由v2.0.0于2021年5月26日创建