U1A5

library(prettydoc)

probabilidad

distribucion de probabilidad

distribucion exponencial

curve(dexp(x),  from=0, to=10)

distribucion binomial

x <- rbinom(20, 1, 0.5)
x

##  [1] 1 0 0 1 1 1 0 0 0 0 0 1 0 0 1 1 0 1 0 0

conteo de exitos vs fracasos

table(x)

## x
##  0  1 
## 12  8

• igual número de 0 y de 1 (50/50)