r - 2 二项分布在 R 中重叠

Question

我将如何用不同的方式制作两个二项式 pdf 的图表，并用阴影或任何东西填充重叠？

Answer 1

尝试这个：

df <- rbind(data.frame(binom=rbinom(1000, 20, 0.2), binomial.p='0.2') , data.frame(binom=rbinom(1000, 20, 0.5),binomial.p='0.5'))
library(ggplot2)
ggplot(df, aes(binom, fill=binomial.p)) + 
geom_histogram(position = 'dodge', binwidth = 1) + 
xlab('Number of success (n=20)')

ggplot(df, aes(binom, fill=binomial.p)) + 
geom_density(alpha=0.2) + 
xlab('Number of success (n=20)')