Rで解析:インタラクティブに展開収束なツリーダイアグラム「collapsibleTree」パッケージ

Rの解析に役に立つ記事
スポンサーリンク

インタラクティブに展開収束なツリーダイアグラムを作成するパッケージの紹介です。かなり、活用範囲が広いパッケージと考えます。

パッケージバージョンは0.1.7。実行コマンドはRStudioのRStudio Desktop 2021.09.2+382、windows 11のR version 4.1.2で確認しています。

スポンサーリンク

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

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

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

実行コマンド

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

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

###データ例の作成#####
n <- 500
TestData <- data.frame("Group" = sample(paste0("Group", 1:5), n, replace = TRUE),
                       "LETTERS" = sample(LETTERS[1:24], n, replace = TRUE),
                       "letters" = sample(letters[1:24], n, replace = TRUE),
                       "numeric" = sample(as.character(seq(n)), n, replace = FALSE))

########

#インタラクティブに展開収束するツリーダイアグラムを作成:collapsibleTreeコマンド
#データを指定:dfオプション
#階層データを指定:hierarchyオプション
#シンボル塗色を設定:fillオプション;rootを含めた全階層分のデータ数が必要
collapsibleTree(df = TestData,
                hierarchy = c("Group", "LETTERS", "letters", "numeric"),
                fill = c(
                  #TestData
                  "black",
                  #"Group"
                  rep("green", length(unique(paste(TestData$Group)))),
                  #LETTERS
                  rep("#fef0e7", length(unique(paste(TestData$Group, TestData$LETTERS)))),
                  #letters
                  rep("#5c463e", length(unique(paste(TestData$Group,
                                                     TestData$LETTERS,
                                                     TestData$letters)))),
                  #numeric
                  rep("#f5c971", length(unique(paste(TestData$Group,
                                                     TestData$LETTERS,
                                                     TestData$letters,
                                                     TestData$numeric)))))
)

出力例

シンボルをクリックすることで展開収束します。


少しでも、あなたの解析が楽になりますように。

タイトルとURLをコピーしました