Tamaño de muestra - MAS

### Determinación del tamaño de muestra para un MAS

### Ingreso de datos
dat=c(2,2.5,4,3.8,7.2,10,5.6,4.9,3.3,4,3.5,5.7,10,8.1,4.4,6.6,7.3,8,9,3.9,7.1,4.9,2.3,3.9,11.1,7.3,6.5,5.8,4,3)
alfa<-0.05
N<-10000   #Población
s2<-6,0590 #Varianza estimada. Recordar que debería estimarse
E<-0.20 #Error absoluto

### Cálculos
var(dat)  #Recordar que esta es la var.muestral (n-1)
sd(dat)   #Recordar que esta es la var.muestral (n-1)
z<-qnorm(1-(alfa/2))
n<-((z^2*s2)/(E^2))/(((1/N)*((z^2*s2)/(E^2)))+1)
n

()página 86