Plot Elevation Data on a Relief Map 

Get a grid of elevations near the city of Chongqing, China.

In[1]:=

X Entity["City", {"Chongqing", "Chongqing", "China"}]["Position"]

Out[1]=

In[2]:=

X points = GeoPosition[Flatten[ Table[{29.57 + i/5, 106.58 - j/5}, {i, 1, 20}, {j, 1, 20}], 1]];

In[3]:=

X data = Thread[Thread[points] -> QuantityMagnitude[ GeoElevationData[points, UnitSystem -> "Metric"]]];

Mark each elevation with a color-coded point.

In[4]:=

X GeoRegionValuePlot[data, GeoBackground -> GeoStyling["ReliefMap"], GeoLabels -> (#1 &), ColorFunction -> ColorData["SolarColors"]]

In[5]:=

X -Graphics-