1. Prueba
x=rnorm(100)
boxplot(x)

hist(x)

2. Prueba 2

y=rnorm(50)
shapiro.test(y)
## 
##  Shapiro-Wilk normality test
## 
## data:  y
## W = 0.9632, p-value = 0.121

los datos correspoinden a una normal