amigos. Estoy intentando armar una matriz de confusión para evaluar un modelo lasso.
set.seed(1234)
inTraining <- createDataPartition(ephtfmag$P21, p = .75, list = FALSE)
training <- ephtfmag[ inTraining,]
testing <- ephtfmag[-inTraining,]
modelo1 <- train(P21 ~ .,
data = training,
method = "ridge",
na.action = na.omit,
preProcess = c("scale", "center"))
predicciones1 <- predict(modelo1, newdata = testing)
Todo bien hasta aquí, pero cuando corro la siguiente línea:
resultados1 <- confusionMatrix(predicciones1, testing$P21)
Aparece el error
Error: `data` and `reference` should be factors with the same levels
Si consulto nlevels y levels, el resultado es el siguiente:
nlevels(predicciones1)
[1] 0
nlevels(testing$P21)
[1] 0
levels(predicciones1)
NULL
levels(testing$P21)
NULL
Le estoy dando vuelta a eso y ya he intentado con varias de las respuestas a este problema en el foro pero no encuentro solución. Alguna pista? Gracias!