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

然后使用以下任何方法计算曲线下面积
calculate area under the curve