R：从 long 转向 vector

Question

有没有办法总结另一个变量出现的变量值？

它类似于从长到宽的旋转，但是旋转是在向量中而不是在多个变量中完成的

数据有：

| var1 | var2   |
| :--: |:------:|
| 1    | 2      |
| 1    | 4      |
| 1    | 4      |
| 1    | 4      |
| 1    | 6      |
| 2    | 8      |
| 2    | 8      |
| 2    | 10     |
| 2    | 12     |

数据要：

| var1 | var2      |
| :--: |:---------:|
| 1    | (2, 4, 6) |
| 2    | (8,10,12) |

Answer 1

我们可以在获取 unique 元素后创建一个 list 列

library(dplyr)
df1 %>%
  distinct %>%
  group_by(var1) %>%
  summarise(var2 = list(var2))

Answer 2

一个基础R方法aggregate

aggregate(. ~ var1, df, function(x) list(unique(x)))
  var1      var2
1    1   2, 4, 6
2    2 8, 10, 12