Как можно нарисовать ROC кривую в R?

Как можно нарисовать ROC кривую в R?

Я пользуюсь для этого библиотекой ROCR

install.packages('ROCR')
library('ROCR')

cls = c('P', 'P', 'N', 'P', 'P', 'P', 'N', 'N', 'P', 'N', 'P', 
        'N', 'P', 'N', 'N', 'N', 'P', 'N', 'P', 'N')
score = c(0.9, 0.8, 0.7, 0.6, 0.55, 0.51, 0.49, 0.43, 
          0.42, 0.39, 0.33, 0.31, 0.23, 0.22, 0.19, 
          0.15, 0.12, 0.11, 0.04, 0.01)


pred = prediction(score, cls)
roc = performance(pred, "tpr", "fpr")

plot(roc, lwd=2, colorize=TRUE)
lines(x=c(0, 1), y=c(0, 1), col="black", lwd=1)

AUC считается следующим образом:

auc = performance(pred, "auc")
auc = unlist(auc@y.values)
auc
Я пользуюсь для этого библиотекой ROCR ```` install.packages('ROCR') library('ROCR') cls = c('P', 'P', 'N', 'P', 'P', 'P', 'N', 'N', 'P', 'N', 'P', 'N', 'P', 'N', 'N', 'N', 'P', 'N', 'P', 'N') score = c(0.9, 0.8, 0.7, 0.6, 0.55, 0.51, 0.49, 0.43, 0.42, 0.39, 0.33, 0.31, 0.23, 0.22, 0.19, 0.15, 0.12, 0.11, 0.04, 0.01) pred = prediction(score, cls) roc = performance(pred, "tpr", "fpr") plot(roc, lwd=2, colorize=TRUE) lines(x=c(0, 1), y=c(0, 1), col="black", lwd=1) ```` http://i.stack.imgur.com/Zw4Yw.png AUC считается следующим образом: ```` auc = performance(pred, "auc") auc = unlist(auc@y.values) auc ````
435
просмотров
1
ответов
2
подписчики
Предпросмотр
введите как минимим 10 characters
WARNING: You mentioned %MENTIONS%, but they cannot see this message and will not be notified
Сохраняю...
Сохранено
Все темы будут удалено ?
Сохранены неопубликованные черновики. Нажмите для продолжения редактирования
Discard draft