将对象传递给线函数ifor绘制数据

Question

我的问题如下。我使用git push -u origin <branch name> # repeat for each branch 包来绘制数据。 ROCR函数返回一个我传递来绘制数据的对象，如下所示：

performance

我想向该图中添加另一个example <- performance(prediction1,"tpr","fpr") plot(example,col="red") 对象，但是performance函数接受lines和x坐标而不是对象。实际上，如果我这样做：y会出现此错误：

  

as.double（y）中的错误：         无法将类型“ S4”强制转换为类型“ double”的向量**

Answer 1

您可以使用add = TRUE作为参数plot添加新行：

library(ROCR)
data(ROCR.simple)

prediction1 <- prediction( ROCR.simple$predictions, ROCR.simple$labels)
example1 <- performance(prediction1,"tpr","fpr")
plot(example1, col="red")
example2 <- performance(prediction1, "sens", "spec")
plot(example2, col="blue", add = TRUE)