在 R 中更改 ROC 上的刻度线

Question

library(ROCR)
data(ROCR.simple)
pred = prediction( ROCR.simple$predictions, ROCR.simple$labels)
roc.perf = performance(pred, measure = "tpr", x.measure = "fpr")
plot(roc.perf)

如何将 x 轴和 y 轴的比例改为百分比而不是小数？

注意：我想使用基础 R 解决方案，或使用 ROCR 包中提供的解决方案。我无法访问 GGPLOT2 库，因为我在一个封闭的网络上。

Answer 1

如果您查看 .plot.performance 的代码（用于绘制您的预测），它们将 x 和 y 值存储在@x.values 和@y.values 下。

所以你可以这样做：

plot(roc.perf@x.values[[1]]*100,roc.perf@y.values[[1]]*100)

要将 % 作为刻度，请执行：

plot(roc.perf@x.values[[1]],roc.perf@y.values[[1]],
xaxt="n",yaxt="n",type="l",ylab="True Positive Rate",
xlab="False Positive Rate")

TICKS=seq(0,1,by=0.2)
LABELS=paste0(100*TICKS,"%")
axis(side=2,at=TICKS,label=LABELS)
axis(side=1,at=TICKS,label=LABELS)

在 R 中更改 ROC 上的刻度线

Change tick marks on ROC in R

r

plot

axis

roc