return top n items with highest frequency
top_item(x, n = 1)
x
character
n
top n
top_item(c("a", "b", "c", "b"))