绘制具有轴限制的 ROC 问题。 R地块[重复]答案

【问题标题】：plotting ROC problems with axes limits. R plots [duplicate]绘制具有轴限制的 ROC 问题。 R地块[重复]
【发布时间】：2020-04-08 16:43:23
【问题描述】：

嗯，我一直在尝试用我的 ROCS 以一种特定的方式制作一个情节，以便与我的同事正在做的出版物的风格相匹配。

但是每次我做 ROCS 时，我什至无法减少我的轴，（我在 xlim 中尝试了一些更改），也没有获得图表的“框状”边框。我尝试按照这些教程进行操作

https://www.youtube.com/watch?v=qcvAqAH60Yw https://rdrr.io/cran/pROC/man/ggroc.html

但我什么也没得到，而且 ggroc 拒绝工作，说我的尺寸不正确（即使页面提供的示例也是如此）。

我刚刚用我的数据获得了这个：

但如果我将 xlim 更改为 0,1

不起作用。我已经尝试了它的几种组合。

有什么想法吗？

为了提供一些代码，让我们使用 ASAH 数据。

如果我们这样做，我们在 pROC 中的绘图也会遇到同样的问题。

您能帮我解决这个光荣的堆栈社区吗？编辑：到目前为止，这个很好。但是我仍然有轴的问题，我希望它们作为我发布的第一张图片作为参考开始。

有了 ggplot2，我想我可以做到，不过，感谢提供的答案。

【问题讨论】：

这应该回答你的问题pROC ROC curves remove empty space
如果没有，请编辑这个以突出显示仍不清楚的地方。
非常有用，但我的“函数”（roc）和轴之间仍然有那么小的空间。 ¿ 有没有办法可以强制它作为我的第一张图片？ @Calimo
请用您现在拥有的内容编辑您的问题。
另外我不明白你为什么用 ggplot2 标记这个问题。你也能澄清一下吗？您是否特别想要 ggplot2 的答案？

标签： r ggplot2 plot roc

【解决方案1】：

library(ggplot2)
library(pROC)

#some data
data(aSAH)

# store roc object 
roc.ob <- roc(outcome ~ s100b, aSAH)

ggroc(roc.ob, legacy.axes = T) +
geom_abline(slope = 1 ,intercept = 0) + # add identity line
theme(
panel.background = element_blank(), 
axis.title.x = element_text(size =18, face = 'bold'),
axis.title.y = element_text(size =18, face = 'bold'),
panel.border = element_rect(size = 2, fill = NA), 
axis.text.x = element_text(size = 14, face ='bold'),
axis.text.y = element_text(size = 14, face ='bold')) +
xlab('100% - Specificity') +
ylab('100% - Sensitivity') +
scale_x_continuous(breaks = seq(0,1,0.25), labels = seq(0,1,0.25) * 100) + 
scale_y_continuous(breaks = seq(0,1,0.25), labels = seq(0,1,0.25) * 100)

【讨论】：

这很好用，谢谢。 x.axis 值仍然存在问题，因为我们说 100% 特异性并且它一直从 100 开始。¿有没有办法可以改变它？ ¿ 有没有办法可以在同一个图中绘制 AUC 值？甚至在那里绘制各种 ROCS？我正在寻找有关 ggplot 主题的教程：D，似乎非常有用。 @e.matt
更新了可能有帮助的轴工作
谢谢！必须使代码适应： scale_x_continuous(breaks = (seq(0,1,0.25)*100)-100, labels = seq(0,1,0.25) * 100) + scale_y_continuous(breaks = seq(0,1, 0.25)*100, labels = seq(0,1,0.25) * 100) 但现在完美运行了！ @e.matt