Rでお遊び：なんとも挑戦的な箱ヒゲ図です。「boxplotdbl」パッケージ

コマンドを実行して出力したプロットを見ると「なんじゃこりゃ」と思わず呟きそうになる2軸のboxplotです。かなり革新的で挑戦的なプロットです。

理解するのに戸惑うプロットですが、立体的に考えると「なるほど」と思う表現です。ただ、本プロットを用いて第３者への説明はかなり注意かつ慎重になる必要があります。プロットをそのまま、平面で考えると戸惑います。

実行コマンドでは各データの要約を掲載しています。是非ともプロットと見比べて謎解きをしていただければと思います。

バージョンは1.2.2。実行コマンドはR version 3.2.2で確認しています。

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

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

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

実行コマンド

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

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

###データ例の作成#####
TestData <- data.frame(Group = c(rep("Group1", 7), rep("Group2", 3)),
                       Data1 = c(100, 1:3, 20, 21, 150, 6, 200, 250),
                       Data2 = c(1:7, 8:10))
########

#データの要約を表示
#Data1
tapply(TestData[, 2], TestData[, 1], summary)
$Group1
Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1.00    2.50   20.00   42.43   60.50  150.00 
$Group2
Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
6     103     200     152     225     250 
#Data2
tapply(TestData[, 3], TestData[, 1], summary)
$Group1
Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1.0     2.5     4.0     4.0     5.5     7.0 
$Group2
Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
8.0     8.5     9.0     9.0     9.5    10.0 

#データのプロット:boxplotdouコマンド
boxplotdou(TestData[c(1, 2)], TestData[c(1, 3)])

出力例

・boxplotdouコマンド

少しでも、あなたのウェブや実験の解析が楽になりますように！！