GPS-Empfänger und Höhe
GPS-Empfänger messen Standorte in Bezug auf ein abgeflachtes Referenzellipsoid, das die Oberfläche der Erde approximiert. In der Praxis jeodch sind berechnete Höhen mit dem Referenzellipsoid als Bezugssystem nicht ideal: So ist die Höhe der Oberfläche eines Sees in Bezug auf das Ellipsoid nicht konstant. Die Umwandlung in eine andere Bezugsfläche, das Geoid, welches den mittleren Meeresspiegel repräsentiert und diesen auch auf dem Land fortsetzt, ist also notwendig.
Die Abweichungen des Geoids von einem Referenzellipsoid werden Geoidundulation genannt. Downloaden Sie Undulationsdaten (angegeben in Fuß) für die zusammenhängenden Vereinigten Staaten.
![Click for copyable input](assets.de/gps-receivers-and-elevation/In_92.png)
undulation =
GeoElevationData[Entity["Country", "UnitedStates"], "Undulation"]
![](assets.de/gps-receivers-and-elevation/O_75.png)
Das Geoid ist immer unter dem Referenzellipsoid im Gebiet der USA.
![Click for copyable input](assets.de/gps-receivers-and-elevation/In_93.png)
MinMax[undulation]
![](assets.de/gps-receivers-and-elevation/O_76.png)
Hier ist zum Beispiel die beobachtete Geoidundulation beim Wolfram Headquarters in Champaign.
![Click for copyable input](assets.de/gps-receivers-and-elevation/In_94.png)
GeoElevationData[
GeoPosition[
Entity["City", {"Champaign", "Illinois",
"UnitedStates"}]], "Undulation"]
![](assets.de/gps-receivers-and-elevation/O_77.png)
Downloaden Sie Daten für die ganze Welt.
![Click for copyable input](assets.de/gps-receivers-and-elevation/In_95.png)
undulation = GeoElevationData["World", "Undulation"]
![](assets.de/gps-receivers-and-elevation/O_78.png)
Stellen Sie diese als eine Reliefkarte dar.
![Click for copyable input](assets.de/gps-receivers-and-elevation/In_96.png)
image = ReliefPlot[undulation, DataReversed -> True,
PlotRangePadding -> None, PlotLegends -> Automatic,
MaxPlotPoints -> Infinity, Frame -> False]
![](assets.de/gps-receivers-and-elevation/O_79.png)
Verwenden Sie eine andere Projektion.
![Click for copyable input](assets.de/gps-receivers-and-elevation/In_97.png)
With[{bounds = {{-90, 90}, {-180, 180}}},
Legended[GeoGraphics[{GeoStyling[{"GeoImage", image[[1]]},
GeoRange -> bounds], GeoBoundsRegion[bounds]},
GeoRange -> bounds, GeoProjection -> "WinkelTripel",
GeoGridLines -> True], image[[2]]]]
![](assets.de/gps-receivers-and-elevation/O_80.png)