2 二项分布在 R 中重叠
2 Binomial Distributions Overlap in R
我将如何着手制作两个具有不同均值的二项式 pdf 的图表，并用阴影或任何相关的东西填充重叠部分？
试试这个：
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)')
我将如何着手制作两个具有不同均值的二项式 pdf 的图表，并用阴影或任何相关的东西填充重叠部分？
试试这个：
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)')