r - 2 つのヒストグラムを一緒にプロットする

Question

重複の可能性:
Rで2つのヒストグラムを一緒にプロットする方法は?

2 つのヒストグラムを一緒にプロットしたいのですが、どちらも同じ x 軸単位と y 軸単位を持っています。inp1 と inp2 の 2 つのファイルから 2 つのヒストグラムが取得されます。次のコードを試しましたが、機能しません。

x1<-hist(inp1, 120, plot = 0)  
x2<-hist(inp2, 120, plot = 0)  
hist(x1, x2, 240, plot = 1)

Answer 1

必要なプロットの種類は、厳密に言えばヒストグラムではありません。barplot()ただし、 withを使用して、そのようなものを作成できますbeside=TRUE。

## Example data
d1 <- rnorm(1000)
d2 <- rnorm(1000, mean=1)

## Prepare data for input to barplot
breaks <- pretty(range(c(d1, d2)), n=20)
D1 <- hist(d1, breaks=breaks, plot=FALSE)$counts
D2 <- hist(d2, breaks=breaks, plot=FALSE)$counts
dat <- rbind(D1, D2)
colnames(dat) <- paste(breaks[-length(breaks)], breaks[-1], sep="-")

## Plot it
barplot(dat, beside=TRUE, space=c(0, 0.1), las=2)