用R包标尺修改`pr_curve`和`auc_curve`的图形尺寸

Question

我试着用“标尺”来生成ROC曲线和精确召回曲线。但是，我找不到修改图形形状的方法。这是一个玩具的例子。

## Precision-recall curve
data.frame(true = as.factor(rep(c(0,1), 10)), 
           pred = runif(20)) %>% 
  pr_curve(truth = true, pred) %>% 
  autoplot()

## ROC curve
data.frame(true = as.factor(rep(c(0,1), 10)), 
           pred = runif(20)) %>% 
  roc_curve(truth = true, pred) %>% 
  autoplot()

运行代码时，生成的数字如下所示；

​

顶部图形(ROC曲线)是正方形的，而最下面的图形(查全率曲线)是矩形的。

我试过

• 在width函数中更改pdf和height选项
• 更改ggplot2支持的不同选项(例如，使用theme的plot.margin )

但是找不到一个很好的方法来制作两个相同形状的数字。

我如何才能统一它们的形状(或形式)？

如有任何意见，将不胜感激。

Answer 1

来自ggplot2的coord_fixed()将完成这一任务。请注意，如果您希望绘图区域为正方形，则还需要适配xlim和ylim。

pr_curve(tmp1, truth = true, pred) %>% 
    autoplot() +
    coord_fixed(xlim = 0:1, ylim = 0:1)