新しいバージョンのRをインストール。
今回のバージョンの名称は題名通り。
何か辛いことがあったのか、それとも恋愛中かなんて深読みしてしまう。そんなに考えて名前を付けてる訳ではないのだろうけど。
このSomeone to Lean Onだけど32ビットでも64ビットでも２００２年センサスの読み込みがforeignパッケージでは出来なくなってしまった。Rはデータベースに問題があると言うけれどそういうことではないので対処法が見当たらない。readstata13なるパッケージがあるということなので試してみた。
|
1 2 3 |
install.packages("readstata13") library(readstata13) census2002 <- read.dta13("C:/censo.dta") |
これで一応読み込みは出来た。
しっかり読み込めたか確認するためStataとRでそれぞれ平均年齢を出してみた。
取り合えず問題なさそう。
キチェ語を話す人の総数は１００万人以上とはよく言われるがその根拠というのが説得力に欠くものが多い。
２００２年の国勢調査を改めて見てみた。１５年前に集計されたデータだけど来年新たな国勢調査が発表されるまでは最新のものなのでこれを使う。 
このセンサスでは３歳以上の人に対して言語の質問をしているのでデータを３歳以上の人口に絞る。
その後、話者数が多い５先住民言語のグラフを実数とパーセンテージで表したのがこちら。
母語、若しくは第二・第三言語としてグアテマラでキチェ語を喋る人は952,503人、四捨五入すれば百万人となるけれど百万人以上とはならない。まぁ、百万人に近いことは間違いないけど。１５年前と比べてグアテマラの人口は大分増えたけどそれが先住民言語の話者数増加に繋がっているのかは判断し難い。どの程度喋れれば話者と数えることが出来るかによるかな。
パーセンテージのグラフがこれ。敢えてY軸の上限を１００にした。キチェ語話者は三歳以上の人口の9.32%となっている。
どちらにしてもこれは１５年前のデータなのでやはり現状を知るには新たなセンサスのマイクロ・データが欲しい。
Rコードはこちら
|
1 2 3 4 5 6 7 |
barplot(idioma, names.arg=c("K'iche'","Q'eqchi'","Kaqchikel","Mam","Q'anjob'al"), col=c("#ec6d71", "#b55233", "#a19361", "#84a2d4", "#4f455c"), xlab="Language", ylab="Population Size (thousands)", ylim=c(0,1000), axis.lty=1, las=1, font.main=2, font.lab=1, font=3, #font type cex.main=3, cex.lab=1.2, cex.names=1.2, cex.axis=1.2) #font size box(lty=1) |
以前触れたソロラ県の女性の平均身長が世界一低いという件についてデータを調べてみた。
新聞記事にあった通り確かに平均身長は145CMで低いことは低いけど、ENSMI2014/15のデータによると幾つかの県の女性の平均身長はソロラ県の女性とあまり変わりがない。確かに貧しい県ではあるけど、平均身長が他の県と比べて低いのはやはり先住民率が高いことが主要因だと思う。特に西部の先住民は東部の人たちと比べても小柄そうだし。
Rのコードはこんな感じで。
|
1 2 3 4 5 |
par(las=1, xaxs="i", yaxs="i") hist(subHeight, freq = FALSE, xlab = "Height", main = "", xlim = c(100, 180), ylim = c(0, 0.1), breaks = 50, col="#165e83") lines(density(subHeight), col = "#ed6d3d", lwd = 3) axis(side=1, at=seq(100, 180, 10)) |
今回は和色を使ってみた。藍色はソロラ県にも関係があると言える色。
Rは重用しているプログラムだけど更新の際は再インストールする必要がある点が面倒。正確には再インストール自体よりパッケージの再インストールだけど。
少しでも煩わさを軽減させるため最近ではパッケージを一括インストールする様にしている。プログラムが更新される度に毎回インストールしている訳ではないけれど。
やり方自体は至って簡単でこの１行だけ
|
1 |
install.packages(available.packages()[,1]) |
他にもやり方はあるだろうけどずっと１０年位これを使ってきた。ミラーサイトを選んでダウンロードが開始されたら待つだけ。全てのパッケージなのでそれなりに時間は掛かる。
半年ぶりにRを再インストールしたけど今回のバージョン名は「You Stupid Darkness」なのね。ジョークなんだろうけど、学者やプログラマらしくはないなぁ。
以前紹介したのコードを使って実際に描いてみた。その過程の動画。
