r - R:使用ROCR绘制多个不同颜色的ROC曲线

以下代码摘自@adibender答案：“在一个图ROCR中有多个ROC曲线”。该代码部分来自？plot.performance。

library(ROCR)
data(ROCR.simple)
preds <- cbind(p1 = ROCR.simple$predictions,
            p2 = abs(ROCR.simple$predictions +
            rnorm(length(ROCR.simple$predictions), 0, 0.1)))

pred.mat <- prediction(preds, labels = matrix(ROCR.simple$labels,
            nrow = length(ROCR.simple$labels), ncol = 2) )

perf.mat <- performance(pred.mat, "tpr", "fpr")
plot(perf.mat)

我想使用r包ROCR在单个图中说明多个ROC曲线，如上面的代码。但是，我希望ROC曲线具有不同的颜色。如何将不同的颜色应用于不同的曲线？提前致谢。

最佳答案

尝试以下操作（您可以使用ROCR进行操作）：

library(ROCR)
data(ROCR.simple)
preds <- cbind(p1 = ROCR.simple$predictions,
               p2 = abs(ROCR.simple$predictions +
                          rnorm(length(ROCR.simple$predictions), 0, 0.1)))
n <- 2 # you have n models
colors <- c('red', 'blue') # 2 colors
for (i in 1:n) {
   plot(performance(prediction(preds[,i],ROCR.simple$labels),"tpr","fpr"),
                                           add=(i!=1),col=colors[i],lwd=2)
}