powered by
LogLoss(y_pred, y_true)
data(cars) logreg <- glm(formula = vs ~ hp + wt, family = binomial(link = "logit"), data = mtcars) LogLoss(y_pred = logreg$fitted.values, y_true = mtcars$vs)
Run the code above in your browser using DataLab