``` preds <- predict(glmnet_classifier, dtm_test_tfidf, type = 'response')[ ,1] glmnet:::auc(as.numeric(tweets_test$sentiment),preds) >NAN ``` gives error
gives error