Contagem de posts

dados %>% 
  group_by(from.name) %>% 
  summarise(n = n()) %>% 
  kable()
from.name n
Aécio Neves 422
Dilma Rousseff 454
Eduardo Jorge 194
Luciana Genro 541
Marina Silva 413
Pastor Everaldo 233