尋找最佳臨界值
想像你正在進行一個避免客戶違約的行銷活動。你可以藉由預測結果來規劃活動。因此,臨界值(threshold)的選擇會直接影響成果。如果你知道這個活動的成本與報酬,就能以經驗方式檢驗哪個臨界值最合理。在這個練習中,我們面臨以下情境:
如果因為我們的活動而讓客戶沒有違約,也就是我們正確預測了違約(真陽性,true positive),我們可獲得 1000€ 的報酬。但如果我們把活動投放給本來就不會違約的客戶,也就是我們錯誤地預測該客戶會違約(假陽性,false positive),我們將承擔 250€ 的成本。
從上一題我們知道受限模型(restricted model)是最佳模型。因此,請只為該模型計算最佳臨界值。預測結果已存於 defaultData 資料框的 predNew 欄位。請使用 SDMTools 套件。
本練習屬於課程
R 的行銷分析機器學習
動手互動練習
試著完成這個範例程式碼,體驗一下這個練習。
library(SDMTools)
# Confusion matrix with threshold 0.5
confMat <- confusion.matrix(defaultData$PaymentDefault,
defaultData$predNew,
threshold = ___)
confMat