The area under a curve examples:
> library(Hmisc) > set.seed(1) > predicted <- runif(200) > dead <- sample(0:1, 200, TRUE) > roc.area <- somers2(predicted, dead)["C"]