Planee una escapada de fin de semana
Encuentre las ciudades de EE.UU. más grandes y sus distancias de viaje desde Champaign, Illinois.
In[1]:=
data = Quiet[Table[{CommonName[city], QuantityMagnitude[
TravelDistance[{Entity[
"City", {"Champaign", "Illinois", "UnitedStates"}],
city}]]}, {city,
CountryData["UnitedStates", "LargestCities"]}]]; Cree una nube de palabras a partir de los nombres de ciudades con sus respectivas distancias de viaje, y utilice una escala inversa para que las ciudades más cercanas sean más prominentes.
In[2]:=
data = Cases[data, {_String, _Real}];
WordCloud[data, ImageSize -> 400, ScalingFunctions -> (1/# &),
PlotTheme -> "Marketing"]Out[2]=
