Atv1 Inferência - Mestrado

set.seed(123)
norm1 <- rnorm(5,100,10)
norm2 <- rnorm(50,100,10)
norm3 <- rnorm(500,100,10)
norm4 <- rnorm(5000,100,10)

set.seed(123)
pois1 <- rpois(5,0.5)
pois2 <- rpois(50,0.5)
pois3 <- rpois(500,0.5)

set.seed(123)
exp1 <- rexp(5,0.2)
exp2 <- rexp(50,0.2)
exp3 <- rexp(500,0.2)
exp4 <- rexp(5000,0.2)

set.seed(123)
gam1 <- rgamma(5,2,1)
gam2 <- rgamma(50,2,1)
gam3 <- rgamma(500,2,1)
gam4 <- rgamma(5000,2,1)

Plots