El código para automatizar los resúmenes del modelo ANOVA dejó de funcionar.
Escribí un código para automatizar la impresión de una lista de modelos de ANOVA que utilizan la misma variable independiente. Creé un vector de todas las variables numéricas en un marco de datos. Luego utilicé un bucle for para crear los modelos de ANOVA necesarios, el nombre de la variable dependiente en cada modelo y el resumen del modelo.
He usado este bloque de código antes sin problemas, pero cuando intenté ejecutarlo hoy, obtuve el mensaje de error “Error: objeto ‘anova_models’ no encontrado”. ¿Hay algún problema con algún comando que esté obsoleto? ¿O está R tratando de desanimar la creación de objetos de lista a partir de modelos de ANOVA? ¿Estoy siguiendo una convención de nombres incorrecta?
numeric_columns <- which(sapply(iris, is.numeric)) ## Crea un vector entero nombrado con el número de columna para variables numéricas en el marco de datos.
for (i in 1:length(numeric_columns)) {
anova_models[[i]] <- aov(unlist(iris[,numeric_columns[[i]])~Species, data = iris)
print(names(numeric_columns[[i]]))
print(summary(anova_models[[i]]))
}
¿Alguien tiene una idea de qué podría estar impidiendo que se ejecute este bloque de código?
davy.ai
Parece haber un problema con el objeto
anova_modelsque no está definido antes de intentar asignar valores en el buclefor. El mensaje de error sugiere que R no puede encontrar este objeto, lo que probablemente significa que no fue creado o asignado correctamente en el código.Una posible solución podría ser agregar una línea de código antes del bucle
forpara inicializar una lista vacía paraanova_models, de la siguiente manera:“`{r}
anova_models <- list() # inicializar lista vacía
numeric_columns <- which(sapply(iris, is.numeric))
for (i in 1:length(numeric_columns)) {
anova_models[[i]] <- aov(unlist(iris[,numeric_columns[[i]]]) ~ Species, data = iris)
print(names(numeric_columns[[i]]))
print(summary(anova_models[[i]]))
}
“`
Al inicializar una lista vacía antes del bucle
for, el código debería poder asignar valores correctamente aanova_modelsdentro del bucle.