aggregate() 是否保证结果将按分组列排序?

Does aggregate() guarantee that the result will be ordered by the grouping columns?

我注意到 aggregate() 似乎 return 其结果按分组列排序。这是保证吗?周围的逻辑能靠这个吗?

举几个例子:

set.seed(1); df <- data.frame(group=sample(letters[1:3],10,replace=T),value=1:10);
aggregate(value~group,df,sum);
##   group value
## 1     a    16
## 2     b    22
## 3     c    17

并且有两组(注意第二组先排序,然后是第一组打破平局):

set.seed(1); df <- data.frame(group1=sample(letters[1:3],10,replace=T),group2=sample(letters[4:6],10,replace=T),value=1:10);
aggregate(value~group1+group2,df,sum);
##   group1 group2 value
## 1      a      d     1
## 2      b      d     2
## 3      b      e     9
## 4      c      e    10
## 5      a      f    15
## 6      b      f    11
## 7      c      f     7

注意:我问是因为我刚刚想出了 的答案,至少在撰写本文时的当前形式取决于 aggregate() return 其结果按分组列排序。

是的,只要您了解因子的自然排序是按其整数键进行的。您可以在代码中看到这一点:

y <- as.data.frame(by, stringsAsFactors = FALSE)
...  # y becomes the "integerized" dataframe of index vectors
grp <- rank(do.call(paste, c(lapply(rev(y), ident), list(sep = "."))), 
        ties.method = "min")
y <- y[match(sort(unique(grp)), grp, 0L), , drop = FALSE]
...