更改 ROC 图表的比例

Question

在运行逻辑回归后，我使用以下代码绘制 ROC 曲线。

fit1 <- glm(formula=GB160M3~Behvscore, data=eflscr,family="binomial", na.action = na.exclude)
prob1=predict(fit1, type=c("response"))
eflscr$prob1 = prob1

library(pROC)
g1 <- roc(GB160M3~prob1, data=eflscr, plot=TRUE,  grid=TRUE, print.auc=TRUE)

绘制的 ROC 曲线如下所示（见下面的链接）

1. x 轴刻度不填充 who 图表。
2. 如何将 x 轴更改为报告 1 - 特别是？

Answer 1

1. 默认情况下，pROC 设置asp = 1以确保绘图是方形的，并且灵敏度和特异性都在同一范围内。您可以将其设置为NA或NULL以释放轴并填充图表，但您的 ROC 曲线会变形。

   plot(g1, asp = NA)
   

   par(pty="s")按照 Joe 的建议使用可能是更好的方法

2. 这纯粹是一个标记问题：请注意，x 轴从 1 减少到 0，这与在增加的轴上绘制 1 特异性完全相同。如果默认行为打扰您，您可以将legacy.axes参数设置TRUE为更改行为。

   plot(g1, legacy.axes = TRUE)