R で平均値を使用して箱ひげ図を描画する方法 (例付き)

次の方法を使用して、R の平均値を使用して箱ひげ図を描画できます。

方法 1: Base R を使用する

 #create boxplots
boxplot(df$values~df$group)

#calculate mean value by group
means <- tapply(df$values, df$group, mean)

#add means as circles to each boxplot
points(means, pch= 20 )

方法 2: ggplot2 を使用する

 library (ggplot2)

#create boxplots with mean values shown as circles
ggplot(df, aes(x=group, y=values, fill=group)) +
  geom_boxplot() +
  stat_summary(fun=mean, geom=' point ', shape= 20 )

次の例は、R の次のデータ フレームで各メソッドを実際に使用する方法を示しています。

 #create data frame
df <- data. frame (team=rep(c('A', 'B', 'C'), each= 5 ),
                 points=c(4, 4, 5, 6, 8, 7, 6, 8, 9, 12,
                          11, 12, 13, 16, 18))

#view first six rows of data frame
head(df)

  team points
1 to 4
2 to 4
3 to 5
4 to 6
5 to 8
6 B 7

例 1: 底 R の平均値を使用して箱ひげ図を作成する

次のコードは、基数 R の平均値を使用して箱ひげ図を作成する方法を示しています。

 #create boxplots
boxplot(df$points~df$team)

#calculate mean value by group
means <- tapply(df$points, df$team, mean)

#add means as circles to each boxplot
points(means, pch= 20 , cex= 1.5 ) 

各箱ひげ図内の黒線は中央値を表し、各箱ひげ図内の黒丸は平均値を表します。

注: 円のサイズを変更するには、 cex引数の値を変更します。

例 2: ggplot2 で平均値を使用した箱ひげ図を作成する

次のコードは、ggplot2 で平均値を含む箱ひげ図を作成する方法を示しています。

 library (ggplot2)

#create boxplots with mean values
ggplot(df, aes(x=team, y=points, fill=team)) +
  geom_boxplot() +
  stat_summary(fun=mean, geom=' point ', shape= 20 , size= 8 ) +
  theme(legend. position = ' none ') 

各箱ひげ図内の黒線は中央値を表し、各箱ひげ図内の黒丸は平均値を表します。

注: 円のサイズを変更するには、 stat_summary()関数の size 引数の値を変更します。

追加リソース

次のチュートリアルでは、箱ひげ図に関する追加情報を提供します。

箱ひげ図を使用する必要があるのはどのような場合ですか? (3つのシナリオ)
箱ひげ図で非対称性を特定する方法
箱ひげ図を比較する方法