Dplyr：如何分组（全部）

Question

正如我在某处看到的那样，当有多层group_by（）时，一个summarise（）会剥离一层分组。 在sql中，有“按所有人分组”的功能。 我想知道是否有一种方法可以取消dplyr中的所有分组（这样，例如，我们可以获取全部而不是每个分组的最大值）

例：

library(dplyr)
library(car)

mtcars %>%
  select(cyl, gear, carb) %>%
  group_by(cyl, gear) %>%
  summarise(count = n()) %>%
  arrange(desc(count))

输出：

Source: local data frame [8 x 3]
Groups: cyl

  cyl gear count
1   4    4     8
2   4    5     2
3   4    3     1
4   6    4     4
5   6    3     2
6   6    5     1
7   8    3    12
8   8    5     2

因此数据为group_by（cyl，gear）：两层分组。 summarise（）计算每个（缸，齿轮）组中有多少辆汽车，然后剥离group_by（gear）层。 现在数据是group_by（cyl）。 如您所见，下降顺序仅适用于每个圆柱体。 （对于cyl == 4，第1-3行下降，对于cyl == 6，在第4-6行下降...）。 如何获得所有8条线的下降？ （第7行应该是第一行。）

关于summarise（）如何剥离分组的另一个示例：

mtcars %>%
  select(cyl, gear, carb) %>%
  group_by(cyl, gear) %>%
  summarise(count = n())

Output:
Source: local data frame [8 x 3]
Groups: cyl

  cyl gear count
1   4    3     1
2   4    4     8
3   4    5     2
4   6    3     2
5   6    4     4
6   6    5     1
7   8    3    12
8   8    5     2

---
mtcars %>%
  select(cyl, gear, carb) %>%
  group_by(cyl, gear) %>%
  summarise(count = n()) %>%
  summarise(count1 = max(count))


Output:
Source: local data frame [3 x 2]

  cyl count1
1   4      8
2   6      4
3   8     12

---

mtcars %>%
  select(cyl, gear, carb) %>%
  group_by(cyl, gear) %>%
  summarise(count = n()) %>%
  summarise(count1 = max(count)) %>%
  summarise(max(count1))

Output:

Source: local data frame [1 x 1]

  max(count1)
1          12

Answer 1

尝试：

mtcars %>%
  count(cyl, gear, name = "count") %>%
  arrange(desc(count))

你会得到：

#Source: local data frame [8 x 3]
#
#  cyl gear count
#1   8    3    12
#2   4    4     8
#3   6    4     4
#4   4    5     2
#5   6    3     2
#6   8    5     2
#7   4    3     1
#8   6    5     1