r - 使用包 ROCR 的精确召回曲线的 AUC

Question

如何使用包 ROCR.. 获得精确召回曲线的 AUC（曲线下面积）？

library(ROCR)
data(ROCR.simple)
pred <- prediction( ROCR.simple$predictions, ROCR.simple$labels)
perf <- performance(pred,"tpr","fpr")
plot(perf)
## precision/recall curve (x-axis: recall, y-axis: precision)
perf1 <- performance(pred, "prec", "rec")
plot(perf1)

Answer 1

您可以先获取精度和召回值

x <- perf1@x.values[[1]] # Recall values
y <- perf1@y.values[[1]] # Precision values

然后使用计算曲线下面积中的任何方法 计算曲线下面积

Answer 2

看起来 ROCR 有 2 个措施。auc 和 aucpr。这对我有用

中华民国

perfauc <- performance(pred, "auc")

公关

perf1auc <- performance(pred, "aucpr")

Answer 3

ROCR 可以直接计算 AUC：

perf <- performance(pred, "auc")

获取 AUC

perf@y.values[[1]]