powered by
AUC(ROC, method="Simpson", ngrid=256)
kROC
set.seed(100) n <- 200 x <- rlnorm(n, mean=2, sd=1) y <- rnorm(n,mean=2,sd=2) xy.ROC <- kROC(c(x,NA,NA),c(y,1.2, NA), na.rm=TRUE) plot(xy.ROC) AUC(xy.ROC)
Run the code above in your browser using DataLab