r - パッケージROCRを使用したPrecision Recall CurveのAUC

Question

パッケージ ROCR を使用して、Precision Recall Curve の AUC (area Under Curve) を取得する方法..?

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

ROCR は AUC を直接計算できます。

perf <- performance(pred, "auc")

AUCを取得

perf@y.values[[1]]