data(roc.examples)
example <- boot.paired.roc(roc.examples$Cont.Pred, roc.examples$Cont.Pred.Outlier,
roc.examples$True.Class)
perf(example, metric = "auc")
perf(example, metric = "tpr", fpr = 0.2) # Get difference in TPR at a FPR of 20\%Run the code above in your browser using DataLab