¿Qué media de propósito del préstamo es diferente?

Antes de analizar otros factores además de purpose_recode que podrían influir en el importe financiado del préstamo, veamos qué medias de purpose_recode son diferentes. Esta es la prueba post hoc a la que se hizo referencia en el ejercicio anterior.

El resultado de esa prueba ANOVA fue estadísticamente significativo con un valor p muy bajo. Esto significa que podemos rechazar la hipótesis nula y aceptar la hipótesis alternativa de que al menos una media era diferente. Pero, ¿cuál?

Debemos usar la prueba HSD de Tukey (Honest Significant Difference). Para realizarla en R, puedes usar TukeyHSD():

TukeyHSD(aov_model, "independent_variable_name", conf.level = 0.9)

Esto realizaría la prueba HSD de Tukey sobre algún aov_model, examinando una "independent_variable_name" específica, con un conf.level del 90%.

Este ejercicio forma parte del curso

Diseño experimental en R

Ver curso

Instrucciones del ejercicio

Construye un modelo con aov() que examine funded_amnt por purpose_recode. Guárdalo como purpose_aov.
Usa TukeyHSD() para realizar la prueba HSD de Tukey sobre purpose_aov con un nivel de confianza de 0.95. Guarda el resultado en un objeto llamado tukey_output.
Convierte a formato ordenado tukey_output con tidy() del paquete broom (que ya se ha cargado por ti).

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

# Use aov() to build purpose_aov
___ <- aov(___ ~ ___, data = ___)

# Conduct Tukey's HSD test to create tukey_output
___ <- TukeyHSD(___, "___", conf.level = ___)

# Tidy tukey_output to make sense of the results
tidy(___)

Editar y ejecutar código