3D GeoElevation Models
Construct a geo elevation model of a country.
In[1]:=
![Click for copyable input](assets.en/3d-geoelevation-models/In_41.png)
country =
GeoElevationData[Entity["Country", "Italy"], Automatic, "Region"]
Out[1]=
![](assets.en/3d-geoelevation-models/O_34.png)
Rescale in the vertical direction to magnify the elevation profile.
In[2]:=
![Click for copyable input](assets.en/3d-geoelevation-models/In_42.png)
{xrange, yrange, {zmin, zmax}} = RegionBounds[country]
Out[2]=
![](assets.en/3d-geoelevation-models/O_35.png)
In[3]:=
![Click for copyable input](assets.en/3d-geoelevation-models/In_43.png)
Show[RegionResize[country, {xrange, yrange, {0, 300 zmax}}],
PlotRange -> {xrange, yrange, {265 zmax, 300 zmax}}]
Out[3]=
![](assets.en/3d-geoelevation-models/O_36.png)