WordCloud
[{$word_1$, $word_2$, ...}]WordCloud
[{$weight_1$ -> $word_1$, $weight_2$ -> $word_2$, ...}]WordCloud
[{$weight_1$, $weight_2$, ...} -> {$word_1$, $word_2$, ...}]WordCloud
[{{$word_1$, $weight_1$}, {$word_2$, $weight_2$}, ...}]WordCloud[StringSplit[Import["ExampleData/EinsteinSzilLetter.txt", CharacterEncoding->"UTF8"]]]
WordCloud[Range[50] -> ToString /@ Range[50]]