powered by
auroc_analytic(scores, labels)
labels <- c(rep(0,10)) labels[c(1,3,5)] <- 1 scores <- 10:1 auroc <- auroc_analytic(scores, labels)
Run the code above in your browser using DataLab