powered by
True Negatives / (True Negatives + False Negatives)
npv(actual, predicted, cutoff = 0.5)
A vector of the labels
A vector of predicted values
A cutoff for the predicted values
# NOT RUN { data(testDF) glmModel <- glm(y ~ ., data = testDF, family="binomial") Preds <- predict(glmModel, type = 'response') npv(testDF$y, Preds, cutoff = 0) # }
Run the code above in your browser using DataLab