Compute the accuracy classification score.
Arguments
- y_pred
Predicted labels vector, as returned by a classifier
- y_true
Ground truth (correct) 0-1 labels vector
Examples
data(cars)
logreg <- glm(formula = vs ~ hp + wt,
family = binomial(link = "logit"), data = mtcars)
pred <- ifelse(logreg$fitted.values < 0.5, 0, 1)
accuracy(y_pred = pred, y_true = mtcars$vs)
#> [1] 0.875