Сюжет Face_Wrap с пакетом pROC в R (несколько переменных)

Question

У меня есть три независимые переменные и одна двоичная переменная результата.Я использую пакет pROC для анализа и хотел бы представить все три графика ROC рядом друг с другом, аналогично функциональности face_wrap.Например, используя следующий код,

library(pROC)
data(aSAH)
roc_i <- roc(aSAH$outcome,
             aSAH$s100b,
             legacy.axes=TRUE,
             ci=TRUE, 
             boot.n=2000, 
             ci.alpha=0.9, 
             stratified=TRUE,
             plot=TRUE, 
             auc.polygon=TRUE, 
             max.auc.polygon=TRUE, 
             grid=TRUE,
             print.auc=TRUE, 
             print.thres='best', 
             print.thres.best.method='y',
             print.thres.adj=c(-0.05, 1.25),#,c(-0.05, 2.0),c(-0.05, 5.0)),
             print.thres.pattern="Cut-off: %.3f \n\nSp: %.3f \nSe: %.3f",
             print.thres.pattern.cex = 1.5,
             print.auc.cex = 1.5,
             print.auc.y=0.2,
             print.auc.x=0.8,
             cex.axis=1.5,
             cex.lab=1.5,
             print.thres.pch=16,
             print.thres.cex=2.0,
             cex.main=1.5)

, я могу сгенерировать одно изображение для одной независимой переменной s100b, в то время как мне нужно еще два (для других инд. Вар 2 и инд. Вар 3)и расположите рядом друг с другом, например, так:

Answer 1

Вы пытались использовать функцию ggroc в pROC ?

library(ggplot2)
library(pROC)

data(aSAH)
roc.list <- roc(outcome ~ s100b + ndka + wfns, data = aSAH)

g <- ggroc(roc.list)
g

g + facet_grid(.~name) + theme(legend.position="none")

Вам все равно нужно будет добавить дополнительную информацию вручную.