Récepteurs GPS et élévation
Les récepteurs GPS mesurent les positions par rapport à un ellipsoïde oblat de référence représentant approximativement la surface de la Terre. Cependant, les élévations par rapport à l'ellipsoïde ne sont pas directement utiles dans la pratique : par exemple, l'élévation de la surface d'un lac n'est pas constante par rapport à l'ellipsoïde. Elle doit être convertie en une autre surface de référence, le géoïde, qui approxime le niveau moyen de la mer et le prolonge à l'intérieur des terres.
L'élévation du géoïde par rapport à l'ellipsoïde de référence est appelée "Undulation". Téléchargez les données ondulatoires en pieds pour les États américains limitrophes.
![Click for copyable input](assets.fr/gps-receivers-and-elevation/In_92.png)
undulation =
GeoElevationData[Entity["Country", "UnitedStates"], "Undulation"]
![](assets.fr/gps-receivers-and-elevation/O_75.png)
Le géoïde est toujours sous l'ellipsoïde de référence dans la région des États-Unis.
![Click for copyable input](assets.fr/gps-receivers-and-elevation/In_93.png)
MinMax[undulation]
![](assets.fr/gps-receivers-and-elevation/O_76.png)
Il s'agit en particulier de l'ondulation au siège de Wolfram à Champaign, IL.
![Click for copyable input](assets.fr/gps-receivers-and-elevation/In_94.png)
GeoElevationData[
GeoPosition[
Entity["City", {"Champaign", "Illinois",
"UnitedStates"}]], "Undulation"]
![](assets.fr/gps-receivers-and-elevation/O_77.png)
Téléchargez des données du monde entier.
![Click for copyable input](assets.fr/gps-receivers-and-elevation/In_95.png)
undulation = GeoElevationData["World", "Undulation"]
![](assets.fr/gps-receivers-and-elevation/O_78.png)
Représentez les données sous la forme d'une carte en relief.
![Click for copyable input](assets.fr/gps-receivers-and-elevation/In_96.png)
image = ReliefPlot[undulation, DataReversed -> True,
PlotRangePadding -> None, PlotLegends -> Automatic,
MaxPlotPoints -> Infinity, Frame -> False]
![](assets.fr/gps-receivers-and-elevation/O_79.png)
Utilisez une autre projection géographique.
![Click for copyable input](assets.fr/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, ImageSize -> Medium], image[[2]]]]
![](assets.fr/gps-receivers-and-elevation/O_80.png)