Nube de palabras ponderadas 

Utilice ImageCollage para crear una nube de palabras con una lista de palabras ponderada por sus apariciones en un fragmento de texto.

Importe un fragmento de texto y cuente el número de apariciones de las palabras.

In[1]:=

X (data = Tally[ ToLowerCase /@ StringCases[ExampleData[{"Text", "ToBeOrNotToBe"}], WordCharacter ..]]) // Short

Out[1]//Short=

Cree una nube de palabras a partir de dichas palabras ponderadas por su aparición.

In[2]:=

X images = #2 -> Rasterize[Style[#1, RandomColor[LCHColor[_, 1, _]]], "Image", RasterSize -> 100] & @@@ data;

In[3]:=

X ImageCollage[images, "Fit", 400, ImagePadding -> 4, Background -> White]

Out[3]=