### PRUEBAS DE NORMALIDAD ###
# Paquetes requeridos
library(nortest)
library(stats)
library(graphics)
### Pruebas graficas ###
# Nombre de datos: "data"
data=x
hist(data, freq = F)
lines(density(data), col=2, lwd=3)
curve(dnorm(x, mean(data), sd(data)), from=min(data), to=max(data), add=T, col=3, lwd=3)
# Grafica QQ-PLOT
qqnorm(data)
qqline(data)
### Contrastes de hipotesis para normalidad ###
#Ho:No hay diferencia significativa entre la distribucion evaluada y una distribucion normal
#Ha:Si hay diferencia significativa entre la distribucion evaluada y una distribucion normal
ks.test(data,"pnorm",mean(data),sd(data)) #Prueba de Kolmogorov-Smirnov
shapiro.test(data) #Prueba de Shapiro-wilk
ad.test(data) #Prueba de Anderson-Darling
lillie.test(data) #Prueba de Lilliefors
