【R】各国の行政区域図

1. はじめに

世界のどこかの国の行政区域図を知りたい時ってありますよね。シェープファイルをダウンロードして、地図を描いてみます。

2. データ準備

シェープファイルは、DIVAS-GISというサイトからダウンロードします。

Zipファイルがダウンロードされ、解凍したファイル群の
　<<ISO3国名 3文字>>_adm1.shp
が、行政区域のシェープファイルです。

今回は、ドイツの地図を描いてみます。ドイツのISO3コードは”DEU”です。

ダウンロードして、展開したファイルは、カレントディレクトリにある ./shp_world というディレクトリにあるとします。

3. 地図を描いてみる。

ずばり、下記の通りです。

library(ggplot2)
library(sf)
library(tidyverse)

map <- read_sf("shp_world/DEU_adm1.shp")

map %>%
  ggplot() +
  geom_sf(aes(fill = NAME_1)) +  
  coord_sf(datum = NA) 

すると、こんな風に地図が描けます。

おお！簡単！

4. さいごに

こんなに簡単に地図を描けるとは思っていませんでした。これなら、世界中のいろいろな国を描けるので、楽しみです。