Rで解析：ドーナツプロットを作成「Homeric」パッケージ

公開日 2016-07-13

選挙報道などで見かける円グラフの真ん中をくり抜いたドーナツプロットを作成するパッケージの紹介です。

パッケージバージョンは0.1-3。実行コマンドはR version 4.2.2で確認しています。

＜おすすめのRに関する書籍です＞

Amazonで小池祐太, 村田昇, 吉田朋広のRによる統計データ解析。アマゾンならポイント還元本が多数。小池祐太, 村田昇, 吉田朋広作品ほか、お急ぎ便対象商品は当日お届けも可能。またRによる統計データ解析もアマゾン配送商品なら通常配送無料。

www.amazon.co.jp

パッケージのインストール

下記コマンドを実行してください。

#パッケージのインストール
install.packages("Homeric")

実行コマンドの紹介

詳細はコマンド、パッケージのヘルプを確認してください。

#パッケージの読み込み
library("Homeric")

###データ例の作成#####
n <- 6
TestData <- setNames(floor(runif(n, min = 1, max = 7)),
                     paste0("Group", 1:n))
########

#ドーナツプロットの作成:PlotDoughnutコマンド
#値を指定:valuesオプション
#要素を左回りにプロット:clockwiseオプション;初期値TRUEで左回り
#12時を基準に角度を指定してプロット:origin.degreesオプション;初期値0
#中心円の直径を指定:radiusオプション;初期値1
#ドーナツプロットの厚さを措定:thicknessオプション;初期値0.5
#枠線をプロット:frame.plotオプション;初期値FALSE
#塗りつぶしの色を指定:colオプション
#中心円ラベルを指定:centre.textオプション;初期値NULL
#中心円ラベル色を指定:centre.colオプション;初期値"black"
#ドーナツプロットラベルを指定:labelsオプション;初期値names(values)
#ドーナツプロットラベル色を指定:labels.colオプション;初期値"black"
#ドーナツプロットの領域を指定:to.degreesオプション;初期値360

#色指定に"mcriPalettes"パッケージを利用
#tidyverseパッケージがなければインストール
if(!require("mcriPalettes", quietly = TRUE)){
  install.packages("mcriPalettes");require("mcriPalettes")
}
#作成
FillCol <- mcriPalette(name = "bluesPaired")

#プロット領域を分割
par(mfrow = c(2, 2), mar = c(0, 0, 0, 0),
    oma = c(0, 0, 5, 0))
PlotDoughnut(TestData,
             centre.text = "色を指定してプロット", col = FillCol)
PlotDoughnut(TestData, centre.text = "右周りにプロット",
             clockwise = FALSE, col = FillCol)
PlotDoughnut(TestData, centre.text = "領域を指定して\n回転しプロット",
             to.degrees = 180, origin.degrees = -90, col = FillCol)
PlotDoughnut(TestData, centre.text = "ドーナツプロットの\n厚さを変更",
             thickness = 0.1, col = FillCol)
title(main = "Homericパッケージのテスト", outer = TRUE, cex.main = 3)