Grille projetée de lignes de latitude et longitude
Cette fonction trace la grille complète des parallèles et méridiens (en rouge et bleu, respectivement) après avoir été projetée avec une projection géographique.
In[1]:=
graticule[proj_] :=
With[{centering = {0, 0, 1.5},
diff = Quantity[10, "AngularDegrees"]},
Framed[Labeled[
GeoGraphics[GeoRange -> "World",
GeoProjection -> {proj, "Centering" -> centering},
GeoGridLines -> diff, GeoGridLinesStyle -> {Red, Blue},
GeoBackground -> None, PlotRangePadding -> Scaled[0.1]], proj]]
]
Voici trois exemples.
In[2]:=
graticule["Armadillo"]
Out[2]=
In[3]:=
graticule["AmericanPolyconic"]
Out[3]=
In[4]:=
graticule["Bonne"]
Out[4]=
Calculez les grilles de latitude-longitude pour les 151 projections avec un modèle de référence sphérique.
In[5]:=
plots = graticule /@ GeoProjectionData["Spherical"];
Pixelisez-les en utilisant une taille d'image assez petite.
In[6]:=
images = Rasterize[#, ImageSize -> 200] & /@ plots;
Créez un collage d'image.
In[7]:=
ImageCollage[images]
Out[7]=