2 Binomialverteilungen Überlappung in R

Question

Wie würde ich eine Grafik von zwei Binomial-PDFs mit unterschiedlichen Mitteln erstellen und die Überlappung mit Schattierungen oder irgendetwas anderem füllen?

Answer 1

Versuchen Sie folgendes:

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)')