Термометры 

In[1]:=

X cities = {"Cairo", "Fairbanks", "Tangiers", "Moscow", "Chicago", "Miami", "Sydney", "London"};

In[2]:=

X citytemps = WeatherData[#, "Temperature"] & /@ cities;

Использование термометров, поддерживающих единицы измерения, для отображения температур в нескольких городах.

In[3]:=

X Row[MapThread[ ThermometerGauge[Quantity[#, "Celsius"], Quantity[ {-25, 40}, "Celsius"], GaugeFrameStyle -> None, GaugeLabels -> {"Unit", Placed[#2, Top]}] &, {citytemps, cities}]]

Out[3]=