R で複数のヒストグラムをプロットする方法 (例付き)

次の構文を使用して、ベース Rの同じチャートに複数のヒストグラムをプロットできます。

 hist(data1, col=' red ')
hist(data2, col=' blue ', add= TRUE )

また、次の構文を使用して、 ggplot2で複数のヒストグラムをプロットできます。

 ggplot(df, aes(x = x_var, fill = grouping_var)) +
  geom_histogram(position = ' identity ', alpha = 0.4 )

次の例は、これらの各メソッドを実際に使用する方法を示しています。

方法 1: 基数 R でいくつかのヒストグラムを描画します。

次のコードは、基数 R の 1 つのプロットに複数のヒストグラムをプロットする方法を示しています。

 #make this example reproducible
set. seeds (1)

#define data
x1 = rnorm(1000, mean=0.8, sd=0.2)
x2 = rnorm(1000, mean=0.4, sd=0.1)

#plot two histograms in same graph
hist(x1, col=' red ', xlim=c(0, 1.5), main=' Multiple Histograms ', xlab=' x ')
hist(x2, col=' green ', add= TRUE )

#add legend
legend(' topright ', c(' x1 variable ', ' x2 variable '), fill=c(' red ', ' green ')) 

方法 2: ggplot2 で複数のヒストグラムをプロットする

次のコードは、 ggplot2を使用して R の単一のプロットに複数のヒストグラムをプロットする方法を示しています。

 library (ggplot2)

#make this example reproducible
set. seeds (1)

#create data frame
df <- data. frame (var = c(rep(' x1 ', 1000), rep(' x2 ', 1000) ),
                   value = c(rnorm(1000, mean=0.8, sd=0.1),
                             rnorm(1000, mean=0.4, sd=0.1)))

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

  var value
1 x1 0.7373546
2 x1 0.8183643
3 x1 0.7164371
4x1 0.9595281
5 x1 0.8329508
6 x1 0.7179532

#plot multiple histograms
ggplot(df, aes(x=value, fill=var)) +
  geom_histogram(color=' #e9ecef ', alpha=0.6, position=' identity ')

scale_fill_manual()関数を使用すると、ヒストグラムの色をすばやく変更できます。

追加リソース

次のチュートリアルでは、R で他の一般的なグラフを作成する方法を説明します。

R で相対頻度ヒストグラムを作成する方法
R で 1 つのグラフに複数の箱ひげ図をプロットする方法
R でグラフに複数の線をプロットする方法