Planeje uma viagem final de semana
Encontre as maiores cidades dos Estados Unidos e suas distâncias de viagem partindo de Champaign, Illinois.
In[1]:=
data = Quiet[Table[{CommonName[city], QuantityMagnitude[
TravelDistance[{Entity[
"City", {"Champaign", "Illinois", "UnitedStates"}],
city}]]}, {city,
CountryData["UnitedStates", "LargestCities"]}]]; Crie uma nuvem da palavra dos nomes de cidades com suas respectivas distâncias de viagem, e use uma escala inversa para que as cidades mais próximas tenham maior destaque.
In[2]:=
data = Cases[data, {_String, _Real}];
WordCloud[data, ImageSize -> 400, ScalingFunctions -> (1/# &),
PlotTheme -> "Marketing"]Out[2]=
