コマンドを実行して出力したプロットを見ると「なんじゃこりゃ」と思わず呟きそうになる2軸のboxplotです。かなり革新的で挑戦的なプロットです。
理解するのに戸惑うプロットですが、立体的に考えると「なるほど」と思う表現です。ただ、本プロットを用いて第3者への説明はかなり注意かつ慎重になる必要があります。プロットをそのまま、平面で考えると戸惑います。
実行コマンドでは各データの要約を掲載しています。是非ともプロットと見比べて謎解きをしていただければと思います。
バージョンは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)])
出力例
少しでも、あなたのウェブや実験の解析が楽になりますように!!