Question

我想列出与另一个变量的值相关联的所有不同值。例如：

nums <- rep(1:3,5)
nums2 <- 142:156
numbers <- data.frame(sort(nums),nums2)

         nums nums2
1           1   142
2           1   143
3           1   144
4           1   145
5           1   146
6           2   147
7           2   148
8           2   149
9           2   150
10          2   151
11          3   152
12          3   153
13          3   154
14          3   155
15          3   156

现在我想弄清楚如何为nums2的每个唯一值列出nums的所有唯一值，以便我可以获得这样的列表：

         nums values
1           1   142,143,144,145,146
2           2   147,148,149,150,151
3           3   152,153,154,155,156

感谢任何帮助。

Answer 1

您可以将aggregate与paste一起使用：

aggregate(cbind(values=nums2) ~ nums, numbers, paste, collapse=",")
  nums              values
1    1 142,145,148,151,154
2    2 143,146,149,152,155
3    3 144,147,150,153,156

Answer 2

setNames(data.frame(do.call(rbind, lapply(split(numbers, numbers$sort.nums.),
                      function(a) c(a$sort.nums[1], paste(a$nums2, collapse = ", "))))),
                      nm = c("nums","values"))

Answer 3

在dplyr中，这看起来像是：

numbers %>% group_by(sort.nums.) %>% summarise( values= paste(nums2,collapse=",") )

Answer 4

以下是使用data.table

的选项

library(data.table)
unique(setDT(numbers))[, .(values = toString(nums2)), by = nums]
#   nums                  values
#1:    1 142, 143, 144, 145, 146
#2:    2 147, 148, 149, 150, 151
#3:    3 152, 153, 154, 155, 156

R列出另一个变量的每个值的所有不同值

4 个答案: