Mengubah probabilitas prior
Seperti disebutkan dalam video, Anda juga dapat mengubah probabilitas prior untuk membangun pohon keputusan. Ini merupakan cara tidak langsung untuk menyesuaikan tingkat kepentingan salah klasifikasi untuk tiap kelas. Anda dapat menambahkan argumen lain di dalam rpart() untuk menyertakan probabilitas prior. Argumen yang Anda perlukan berbentuk sebagai berikut
parms = list(prior=c(non_default_proportion, default_proportion))
Paket rpart sekarang sudah dimuat di ruang kerja Anda.
Latihan ini adalah bagian dari kursus
Pemodelan Risiko Kredit di R
Petunjuk latihan
- Ubah kode yang disediakan sehingga sebuah pohon keputusan dikonstruksi, sertakan argumen
parmsdan ubah proporsi non-default menjadi 0.7 dan default menjadi 0.3 (jumlahnya harus selalu 1). Selain itu, sertakan jugacontrol = rpart.control(cp = 0.001). - Plot pohon keputusan menggunakan fungsi plot dan nama objek pohon tersebut. Tambahkan argumen kedua "uniform=TRUE" untuk mendapatkan cabang berukuran sama.
- Tambahkan label pada pohon menggunakan fungsi
text()dan nama objek pohon keputusan.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Change the code below such that a tree is constructed with adjusted prior probabilities.
tree_prior <- rpart(loan_status ~ ., method = "class",
data = training_set)
# Plot the decision tree
# Add labels to the decision tree