This code shows a 3D plot of the elevations in California:
ListPlot3D[{CityData[#, "Longitude"], CityData[#, "Latitude"],
CityData[#, "Elevation"]} & /@
CityData[{All, "California", "UnitedStates"}]
, ColorFunction -> "Topographic"
, MeshFunctions -> {#3 &}
, AxesLabel -> { None, None, "Elevation"}
, InterpolationOrder -> 1
]
I am trying to make the plot "smoother". I could not find a PlotPoints option for ListPlot3D[]
and InterpolationOrder is a valid option but appears to have no effect on this graphic . Thanks in advance.