2 ms·
Since we're comparing notes, here's the Mathematica version: Reverse[SortBy[Tally[StringSplit[#]], #[[2]] &]][[;; 10, 1]] &
by superfx 13y ago
Since we're comparing notes, here's the Mathematica version:
Reverse[SortBy[Tally[StringSplit[#]], #[[2]] &]][[;; 10, 1]] &