2016-02-07 4 views
0

Я хочу, чтобы сравнить несколько моделей логистической регрессии. И напечатайте на одной диаграмме несколько кривых ROC. Как я могу это сделать? Например, для одной модели это выглядит какУчасток нескольких кривых ROC на одном участке?

pred_fit4 <- prediction(workData$pred,workData3$value) 
perf_fit4 <- performance(pred_fit4,"tpr","fpr") 
roc <- plot(perf_fit4,colorize = T, print.cutoffs.at = seq(0,1),) 

и его выходной кривой, как показано ниже:

enter image description here

И как я могу добавить новую строку? похоже,

for (...) { 
....... 
....... 
    pred_fit4 <- prediction(workData$pred,workData3$value) 
    perf_fit4 <- performance(pred_fit4,"tpr","fpr") 
    #need add line on exist chart 
    roc <- plot(perf_fit4,colorize = T , print.cutoffs.at = seq(0,1),) 
} 
+1

Вы посмотрели на что-то вроде этого: par (mfrow = c (nrow, ncol))? Где nrow и ncol определяют сетку графиков –

+0

Добро пожаловать в SO. Вы должны иметь возможность добавлять строки к существующему базовому графику с помощью 'lines()' (help '? Lines'). Для этого есть множество примеров на SO. Пожалуйста, привыкните предоставлять минимально воспроизводимые (!) Примеры, готовые скопировать и вставить, чтобы другие могли поиграть с ним, – lukeA

+0

Это то, чего вы хотите достичь? http://www.statmethods.net/advgraphs/layout.html – GGA

ответ

0

Купить сейчас Использование пакета pROC. Вы можете создать объект ROC, а затем добавить к тому же графу, используя строки, и добавить столько ROC, сколько захотите.

obj.rpart1=roc(label1 ~ p1.rpart, smooth = T) 
obj.rpart2=roc(label1 ~ p1.rpart, smooth = T) 
plot(obj.rpart) 
lines(obj.rpart2) 
Смежные вопросы