投影法の緯線と経線の格子
この関数は,地図投影法で投影してから,緯線(赤)と経線(青)の完全な格子を描画する.
In[1]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_29.png)
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]]
]
以下に3つの例を挙げる.
In[2]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_30.png)
graticule["Armadillo"]
Out[2]=
![](assets.ja/projected-grid-of-latitude-and-longitude-lines/O_18.png)
In[3]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_31.png)
graticule["AmericanPolyconic"]
Out[3]=
![](assets.ja/projected-grid-of-latitude-and-longitude-lines/O_19.png)
In[4]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_32.png)
graticule["Bonne"]
Out[4]=
![](assets.ja/projected-grid-of-latitude-and-longitude-lines/O_20.png)
球体基準モデルの151の投影法すべてについて経緯度の格子を計算する.
In[5]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_33.png)
plots = graticule /@ GeoProjectionData["Spherical"];
十分小さい画像サイズを使って,それらをラスタライズする.
In[6]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_34.png)
images = Rasterize[#, ImageSize -> 200] & /@ plots;
画像のコラージュを構築する.
In[7]:=
![Click for copyable input](assets.ja/projected-grid-of-latitude-and-longitude-lines/In_35.png)
ImageCollage[images]
Out[7]=
![](assets.ja/projected-grid-of-latitude-and-longitude-lines/O_21.png)