这是我的密码
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)
我拿到了那张桌子,但我想数一数十位最常写的作家最好的方法是什么,最好是使用table函数谢谢
我们可以 sort 得到前10个元素 head
sort
head
head(sort(table(author), decreasing = TRUE), 10)