您可以使用aggregate
如下:
dat <- read.table(text="1 2
1 3
2 4
3 2
2 1
1 7")
aggregate(V2 ~ V1, dat, paste, collapse = ", ")
## > aggregate(V2 ~ V1, dat, paste, collapse = ", ")
## V1 V2
## 1 1 2, 3, 7
## 2 2 4, 1
## 3 3 2
或者(根据贾斯汀的问题)c
改为使用:
aggregate(V2 ~ V1, dat, c)