Strateji tablosu ve strateji eğrisi

Önceki egzersizde yaptığın hesaplamaları çeşitli kabul oranları için tekrarlayarak bir strateji tablosu elde edebilirsin. Bu tablo, bankalar için yararlı bir araçtır; çünkü bir kabul stratejisi belirlemelerine daha iyi bir içgörü sağlayabilir.

Artık belirli bir kabul oranı için kötü oranı nasıl hesaplayacağını biliyorsun; bu yüzden işleri hızlandırmak için strategy_bank fonksiyonu yazıldı ve çalışma alanına yüklendi. Bu fonksiyon, %5'in katları olan kabul oranları (0%, 5%, 10%, …) için eşik değerini (cut-off) ve kötü oranı hesaplar.

Bu egzersiz

R ile Kredi Riski Modellemesi

kursunun bir parçasıdır

Kursu Görüntüle

Egzersiz talimatları

strategy_bank fonksiyonuna bir göz at.
predictions_cloglog vektörü, 2. bölümde kullandığın cloglog modelini kullanarak temerrüt için tahmin edilen olasılıkları içerir; predictions_loss_matrix vektörü ise 3. bölümde oluşturduğun kayıp matrisi içeren budanmış ağaçtan temerrüt için tahmin edilen olasılıkları içerir. strategy_bank fonksiyonunu her iki tahmin vektörüne de uygula ve sırasıyla strategy_cloglog ve strategy_loss_matrix adlarını ver.
Strateji tablolarını, nesne adlarını $table ile birlikte kullanarak elde edebilirsin.
Strateji eğrileri senin için çizildi. Ağaç modelinin strateji eğrisi oldukça garip bir davranış gösteriyor. Sınıflandırma ağaçlarının yapısı nedeniyle burada tuhaf "sıçramalar" görme olasılığın daha yüksek olabilir. Ayrıca, kayıp matrisi kullanılan ağaç çok büyüktü; bu da aşırı uyumun (overfitting) bir sonucu olabilir!

Uygulamalı interaktif egzersiz

Bu örnek kodu tamamlayarak bu egzersizi bitirin.

# Have a look at the function strategy_bank


# Apply the function strategy_bank to both predictions_cloglog and predictions_loss_matrix



# Obtain the strategy tables for both prediction-vectors


# Plot the strategy functions
par(mfrow = c(1,2))
plot(strategy_cloglog$accept_rate, strategy_cloglog$bad_rate, 
     type = "l", xlab = "Acceptance rate", ylab = "Bad rate", 
     lwd = 2, main = "logistic regression")

plot(strategy_loss_matrix$accept_rate, strategy_loss_matrix$bad_rate, 
     type = "l", xlab = "Acceptance rate", 
     ylab = "Bad rate", lwd = 2, main = "tree")

Kodu Düzenle ve Çalıştır