Mi matriz de confusión es la siguiente:
> table(actual, predicted_all)
predicted_all
actual 0 1
0 1728 5261
1 2088 168
Mientras que el AUC parece un poco demasiado alto a mis ojos:
auc(real, predicted_all) Área bajo la curva: 0.8391
Sospecho que estoy haciendo algo mal, ¿o no es así?