generate functionTue, 02 May 2023
mostrar una distribución Binomial con p = 0,8 , usando 'hist' y 'curve'
p <- 0.8 binom <- rbinom(1000, 1, p) hist(binom, freq = FALSE, main = "Binomial Distribution", xlab = "x", ylab = "density") curve(dbinom(x, 1, p), add = TRUE)