Как я могу добавить несколько откалиброванных кривых на один и тот же график

Question

set.seed(888) 
y<-sample(c(0,1), 100, replace = TRUE) 
x1<-rnorm(100,2,3) 
x2<-rnorm(100,1,4) 
library(rms) 
f1<-lrm(y~x1,,x=TRUE,y=TRUE) 
f2<-lrm(y~x2,,x=TRUE,y=TRUE) 
plot(calibrate(f1)) 
plot(calibrate(f2),add=TRUE) 

с вышеуказанным кодом предполагается, что оба калибровочных графика будут отображаться на том же рисунке. Тем не менее, он сообщил ошибки:

Предупреждение сообщения:

1: В plot.window (...): "добавить" не графический параметр
2: В plot.xy (ху, типа , ...): «добавить» не является графическим параметром
3: По оси (сторона = сторона, at = at, метки = метки, ...): «Добавить» не графический параметр
4: В ось (сторона = сторона, at = at, метки = метки, ...): «добавить» не графический параметр
5: В поле (...): «добавить» не является графическим параметром Этери
6: В названии (...): «добавить» не графический параметр

Или есть какие-либо другие методы для этой цели? также я хочу указать разные цвета для кривых x1 и x2. Я не знаю, как указать аргумент par.corrected=list(col="blue"). Это не работает.

plot(calibrate(f2),par.corrected=list(col="blue",lwd=2)) 

#n=100 Mean absolute error=0.061 Mean squared error=0.00541 
#0.9 Quantile of absolute error=0.109 

Предупредительные сообщения:

1: В plot.window (...): "par.corrected" не является графическим параметром 2: В plot.xy (х, типа,. ..): «par.corrected» не является графическим параметром 3: В оси (сторона = сторона, at = at, метки = метки, ...):
«par.corrected» не является графическим параметром 4: In ось (сторона = сторона, at = at, метки = метки, ...): «par.corrected» не является графическим параметр 5: В поле (...): «par.corrected» не является графическим параметром 6: В названии (...): «par.corrected» не графический параметр

Answer 1

plot.calibrate функция в rms пакете не реализует add=TRUE, отчасти потому, что гистограммы, показывающие распределение риска будет сталкиваться. Просмотрев код, вы увидите, что нетрудно написать собственную функцию построения графика, чтобы сделать нужные вам графики.