ラベル付き散布図

Rをjupyterでからの続き 

ラベル付き散布図と格闘している。

(1) Excel が一番簡単そうで，調べるとすぐに事例が見つかった。しかし，これはWindows版の場合であり，残念ながらMac版（Microsoft Office 2019 Home & Student）にはその機能がなかった。

(2) Rは統計グラフがお手の物のはずなので多分あるだろう。そこでRをjupyter上に持ってきた。これも簡単に事例が見つかった。見本通りにやってみると，

#今回使うライブラリ

library(maptools)

#データの準備

CC <- c("CAN","DNK","FIN","FRA","DEU","ITA","JPN","KOR","NLD","POL","SWE","GBR","USA")

PAR <- c(13.7,15.7,16.6,16.6,20.2,20.1,22.1,10.3,14.9,13.5,17.6,15.6,12.8)

SE <- c(3.8,7.4,8.6,11.5,8.5,12.2,9.3,1.9,5.4,8.9,9.4,6.2,5.5)

sample <- data.frame(PAR, SE)

rownames(sample) <- CC

以下のerrorが出て（これは例題に対しては実害はなかったが）日本語も化けてしまう。

Checking rgeos availability: FALSE
Note: when rgeos is not available, polygon geometry computations in maptools
depend on gpclib, which has a restricted licence. It is disabled by default;
to enable gpclib, type gpclibPermit()

ただ，日本語文字化けを避けるには（エラーは残るものの），次のようにすればよかった。

par(family= "HiraKakuProN-W3")

plot(sample$PAR, sample$SE, xlab="65歳以上人口比率(%)", ylab="対GDP比高齢者向け社会支出(%)")

pointLabel(x=sample$PAR, y=sample$SE, labels=rownames(sample))

図 R on jupyter のラベル付き散布図の例

(3) juliaではラベル付き散布図の例が探せなかったが，labelled scatter をキーワードとするといとも簡単に解が見つかってしまった。こちらは日本語もすんなり通ってくれる。