カテゴリ変数を対象に1変数のグラフだけでなく、2変数を使用して2重グラフの作成が可能なパッケージの紹介です。グラフは単純な円グラフ、ドーナツグラフ、ローズグラフ、3D円グラフの作成が可能です。
パッケージバージョンは0.2.1。実行コマンドはwindows 11のR version 4.1.3で確認しています。
パッケージのインストール
下記コマンドを実行してください。
#パッケージのインストール install.packages("ggpie")
実行コマンド
詳細はコマンド、各パッケージのヘルプを確認してください。
#パッケージの読み込み library("ggpie") ###データ例の作成##### #tidyverseパッケージがなければインストール if(!require("tidyverse", quietly = TRUE)){ install.packages("tidyverse");require("tidyverse") } set.seed(1234) n <- 30 TestData <- tibble(Group = sample(paste0("Group", 1:4), n, replace = TRUE), Chr_Data = sample(c("か", "ら", "だ", "に", "い", "い", "も", "の"), n, replace = TRUE), Fct_Data = factor(sample(c("か", "ら", "だ", "に", "い", "い", "も", "の"), n, replace = TRUE))) ######## #カテゴリ変数の円グラフを作成:ggpieコマンド #データを指定:group_keyオプション #データの種類を指定:count_typeオプション; #集計データ:"count",未集計データ: "full" #ラベル表示:label_typeオプション;"circle","horizon","none" #ラベル位置:label_posオプション;円内;"in",円外;"out" #ラベル内容:label_infoオプション;"count","ratio","all" #指定パーセント内のラベルを円外に表示:labal_thresholdオプション; #label_posオプション:"in"で効果を発揮 ggpie(data = TestData, group_key = "Group", count_type = "full", label_type = "horizon", label_pos = "in", label_info = "all", label_size = 4, label_color = "black", labal_threshold = 20) #2つのカテゴリ変数の円グラフを作成:ggnestedpieコマンド #オプションはggpieコマンド先頭にinner_/outer_で利用可能 #内円グラフの厚さを指定:inner_thickオプション #外円グラフの厚さを指定:outer_thickオプション ggnestedpie(data = TestData, inner_thick = 0.8, outer_thick = 0.8, group_key = c("Group", "Fct_Data"), count_type = "full", inner_label_info = "all", inner_label_split = NULL, inner_label_size = 3, inner_labal_threshold = NULL, outer_label_info = "all", outer_labal_threshold = 20, outer_label_type = "horizon", outer_label_pos = "in") #2つのカテゴリ変数でグループ毎の扇状グラフを作成:ggrosepieコマンド #軸目盛を表示:show_tickオプション;TRUE/FALSE #中心円の大きさ:donut_fracオプション ggrosepie(data = TestData, group_key = c("Group", "Fct_Data"), count_type = "full", label_info = "all", show_tick = TRUE, donut_frac = 0.3, donut_label_size = 5) #1カテゴリ変数のドーナツグラフを作成:ggdonutコマンド #オプションはggpieコマンドを参照 ggdonut(data = TestData, group_key = "Group", count_type = "full", label_type = "horizon", label_pos = "in", label_info = "all", label_size = 4, label_color = "black", labal_threshold = 20) #1カテゴリ変数の3D円グラフを作成:ggpie3Dコマンド #影の濃度:darkenオプション;1:0 #傾きを調整:tilt_degreesオプション ggpie3D(data = TestData, group_key = "Group", count_type = "full", label_info = "all", label_size = 4, darken = 0.5, tilt_degrees = -5)
出力例
・ggpieコマンド
![](https://sp-ao.shortpixel.ai/client/to_webp,q_glossy,ret_img,w_564,h_461/https://www.karada-good.net/wp/wp-content/uploads/2022/06/63879cc2-9f95-453d-947c-fdd86880860f.png)
・ggnestedpieコマンド
![](https://sp-ao.shortpixel.ai/client/to_webp,q_glossy,ret_img,w_564,h_461/https://www.karada-good.net/wp/wp-content/uploads/2022/06/c19a9597-c58c-4095-abe2-556726e37ba2.png)
・ggrosepieコマンド
![](https://sp-ao.shortpixel.ai/client/to_webp,q_glossy,ret_img,w_564,h_461/https://www.karada-good.net/wp/wp-content/uploads/2022/06/e1a1eb6b-5dfe-4a96-a0d0-b53e2213b560.png)
・ggdonutコマンド
![](https://sp-ao.shortpixel.ai/client/to_webp,q_glossy,ret_img,w_564,h_461/https://www.karada-good.net/wp/wp-content/uploads/2022/06/06e0c69a-bb09-45df-9280-87274bbf4829.png)
・ggpie3Dコマンド
![](https://sp-ao.shortpixel.ai/client/to_webp,q_glossy,ret_img,w_564,h_461/https://www.karada-good.net/wp/wp-content/uploads/2022/06/16409904-73bb-4e25-aa2e-a28b084d75eb.png)
少しでも、あなたの解析が楽になりますように!!