2017-04-06 94 views
0

我熟悉的ROCR package,我用下面的代碼添加額外的懲罰每個FP

library(ROCR) 
data(ROCR.simple) 
pred <- prediction(ROCR.simple$predictions, ROCR.simple$labels) 
perf <- performance(pred,"tpr","fpr") 
plot(perf) 

但要找到最適的截斷,我需要加罰10每個FP,和100每個TN

我怎樣才能使用ROCR軟件包?

回答

0

我想,我找到了答案

auc.tmp <- performance(res,"auc",cost.fp=100, cost.tn=10); 

這樣,我能說什麼都是在混淆矩陣中的每個單元的成本,但我仍然在尋找一種方式來獲得截斷