Ejemplo
Ejemplo
Ejemplo
de la ciudad.
a. ANÁLISIS ESTADÍSTICO
b. Un psicólogo clínico desea evaluar la eficacia de un fármaco para reducir la ansiedad, en los pacientes que acuden a un
hospital de la ciudad. Para ello selecciona al azar a 15 pacientes de su consulta que sufren este problema y forma
aleatoria tres grupos del mismo tamaño. A cada grupo le administra aleatoriamente una dosis del fármaco (10
miligramos, 20 miligramos y 30 miligramos). Al cabo de un tiempo les mide su nivel de ansiedad. Los resultados de la
experimentación se presentan en la siguiente tabla:
Modelo
𝑦𝑖𝑗 = 𝜇 + 𝜏𝑖 + 𝜀𝑖𝑗
𝒚𝒊𝒋 = El nivel de ansiedad promedio del j-ésimo paciente que recibió la i-ésima dosis de fármaco.
ANOVA
Estadística:
H0 = 𝜇10𝑚𝑔 = 𝜇20𝑚𝑔 = 𝜇30𝑚𝑔
Ha = 𝜇10𝑚𝑔 ≠ 𝜇20𝑚𝑔 ≠ 𝜇30𝑚𝑔
2. Nivel de significancia
α = 0.05
3. Estadístico de prueba
EXCEL
𝑇2
𝑺𝑪 = ∑ ∑ 𝑦𝑖𝑗 2 − = 473 − 375 = 98
𝑁
𝑖 𝑖
𝑇𝑗 2 𝑇 2
𝑺𝑪𝑻 = ∑ − = 465 − 375 = 90
𝑛𝑗 𝑁
𝑖
𝑴𝑪 = 𝑆𝐶 − 𝑆𝐶𝑇 = 98 − 90 = 8
𝑆𝐶𝑇 90
𝑴𝑪 = = = 45
𝐾−1 2
𝑆𝐶𝐸 8
𝑴𝑪𝑬 = = = 0.66
𝑁 − 𝐾 12
𝑀𝐶 45
𝑭= = = 67.50
𝑀𝐶𝐸 0.66
5. Toma de la decisión
Dado que el valor p es menor que 0.05 rechazaos la hipótesis nula, es decir, el nivel de ansiedad promedio es diferente en al
menos una de las dosis del fármaco con un 95% de confiabilidad. La dosis del fármaco afecta al nivel de ansiedad.
getwd()
dir()
#Lectura de datos
Datos
View(Datos)
fix(Datos)
attach(Datos)
#Descripción de datos
mean(Ansiedad) # 5
sd(Ansiedad) # 2.645751
hist(Ansiedad)
#H0: El nivel de ansiedad promedio de las tres dosis de fármacos son iguales.
#Ha: El nivel de ansiedad promedio es diferente en al menos una de las dosis del
#fármaco.
#Análisis de Varianza
anova
summary(anova)
#Toma de desición:
#Dado que el valor p es menor que 0.05 rechazaos la hipótesis nula, es decir, la
#ansiedad promedio es diferente en al menos una de las dosis del fármaco con un