r 使用ggplot / normal plot计算并绘制接收器工作特性曲线下的面积（AUC）（ROC）。

Posted 2021-05-24

roc <- AUC::roc(scores, factor(labels))
aucVal <- round(auc(roc), 4)
AUC:::plot.AUC(roc)

rocData <- data.table(fpr=roc$fpr, tpr=roc$tpr)
ggplot(rocData, aes(x=fpr, y=tpr)) +
    geom_line()