Rozdělení dat a matice záměn

Modelování kreditního rizika v R

Lore Dirick

Manager of Data Science Curriculum at Flatiron School

Zahájení analýzy

Screen Shot 2020-06-15 at 8.43.54 AM.png

Trénovací a testovací sada

Screen Shot 2020-06-15 at 8.43.43 AM.png

Trénovací a testovací sada

Screen Shot 2020-06-15 at 8.43.14 AM.png

Křížová validace

Screen Shot 2020-06-15 at 8.43.31 AM.png

Vyhodnocení modelu

      test_set$loan_status    model_prediction   
            ...                     ...
 [8066,]      1                       1
 [8067,]      0                       0
 [8068,]      0                       0
 [8069,]      0                       0
 [8070,]      0                       0
 [8071,]      0                       1
 [8072,]      1                       0
 [8073,]      1                       1
 [8074,]      0                       0
 [8075,]      0                       0
 [8076,]      0                       0
 [8077,]      1                       1
 [8078,]      0                       0
        ...                        ...

Vyhodnocení modelu

      test_set$loan_status    model_prediction   
            ...                     ...
[8066,]       1                       1
[8067,]       0                       0
 [8068,]      0                       0
 [8069,]      0                       0
 [8070,]      0                       0
 [8071,]      0                       1
 [8072,]      1                       0
 [8073,]      1                       1
 [8074,]      0                       0
 [8075,]      0                       0
 [8076,]      0                       0
 [8077,]      1                       1
 [8078,]      0                       0
 [8079,]      0                       1
        ...                        ...

Skutečný stav úvěru vs. predikce modelu

	Bez selhání (0)	Selhání (1)
Bez selhání (0)	8	2
Selhání (1)	1	3

Vyhodnocení modelu

      test_set$loan_status    model_prediction   
            ...                     ...
[8066,]       1                       1
[8067,]       0                       0
 [8068,]      0                       0
 [8069,]      0                       0
 [8070,]      0                       0
 [8071,]      0                       1
 [8072,]      1                       0
 [8073,]      1                       1
 [8074,]      0                       0
 [8075,]      0                       0
 [8076,]      0                       0
 [8077,]      1                       1
 [8078,]      0                       0
 [8079,]      0                       1
        ...                        ...

Skutečný stav úvěru vs. predikce modelu

	Bez selhání (0)	Selhání (1)
Bez selhání (0)	TN	FP
Selhání (1)	FN	TP

Některé metriky...

Přesnost $$\frac{(8+3)}{14} = 78{,}57\%$$
Senzitivita $$\frac{3}{(1+3)} = 75\%$$
Specificita $$\frac{8}{(8+2)} = 80\%$$

Skutečný stav úvěru vs. predikce modelu

	Bez selhání (0)	Selhání (1)
Bez selhání (0)	8	2
Selhání (1)	1	3

Pojďme si procvičit!

Modelování kreditního rizika v R