В dplyr
мы можем count
Group
значения, выбрать 3 верхних значения и расположить их в порядке убывания.
library(dplyr)
df %>% count(Group) %>% top_n(3, n) %>% arrange(desc(n))
# Group n
# <fct> <int>
#1 B 5
#2 A 3
#3 C 2
Мы также можем использовать
df %>% count(Group) %>% arrange(desc(n)) %>% head(3)
Или в базе R
stack(head(sort(table(df$Group), decreasing = TRUE), 3))