powered by
logloss(y, yp)
misclassificationrate
#logloss for perfect fit t <- ifelse(runif(50)<0.5, "a", "b") logloss(y=t, yp=t)
Run the code above in your browser using DataLab