Лучший способ подсчитать 10 самых популярных авторов в R

Question

Вот мой код

page<-read_html("https://stat.ethz.ch/pipermail/r-help/2016-March/date.html")

author<-html_nodes(page, "li i") %>% html_text() %>% trimws()

table(author)

Я получаю таблицу, но я пытаюсь сосчитать десятку самых частых авторов. Каков наилучший способ сделать это, желательно с табличной функцией? спасибо

Answer 1

Мы можем sort и получить первые 10 элементов с head

head(sort(table(author), decreasing = TRUE), 10)