【R】countrycode

1. はじめに

countrycodeは、各国の国コードを変換してくれるパッケージです。国旗のイメージも取得できます。

2. インストール

CRANからインストールできます。

install.packages("countrycode")

3. 使ってみる

以下のコードをサポートしているようです。?codelistでも見ることができます。

• 600+ variants of country names in different languages and formats.
• AR5
• Continent and region identifiers.
• Correlates of War (numeric and character)
• European Central Bank
• EUROCONTROL – The European Organisation for the Safety of Air Navigation
• Eurostat
• Federal Information Processing Standard (FIPS)
• Food and Agriculture Organization of the United Nations
• Global Administrative Unit Layers (GAUL)
• Geopolitical Entities, Names and Codes (GENC)
• Gleditsch & Ward (numeric and character)
• International Civil Aviation Organization
• International Monetary Fund
• International Olympic Committee
• ISO (2/3-character and numeric)
• Polity IV
• United Nations
• United Nations Procurement Division
• Varieties of Democracy
• World Bank
• World Values Survey
• Unicode symbols (flags)

例えば、

countrycode('DZA', origin = 'iso3c', destination = 'cown') 

> countrycode('JPN', origin = 'iso3c', destination = 'cown') 
[1] 740

ベクトルでも扱えます。

cowcodes <- c("ALG", "ALB", "UKG", "CAN", "USA")
countrycode(cowcodes, origin = "cowc", destination = "iso3c")

> countrycode(cowcodes, origin = "cowc", destination = "iso3c")
[1] "DZA" "ALB" "GBR" "CAN" "USA"

国旗のイメージも取得できます。

library(gt)
library(countrycode)

Countries <- c('Japan', 'Germany', 'China', 'Canada', 'Lithuania')
Flags <- countrycode(Countries, 'country.name', 'unicode.symbol')
dat <- data.frame(Countries, Flags)
gt(dat)

上記のコードで出るはずですが、僕の環境ではでませんでした。これは、countrycodeの問題ではなく、Rstudioの問題らしいです。

4. さいごに

現在、さまざまな国コードが混在していて、使うときに困ることがあります。このパッケージで解決できるかもしれません。