
56
데이터 과학을 위한 통계
있다.
R
에서도
descr
패키지에서
CrossTable
함수를 활용해 분할표를 만들 수 있다. 아래 코
드를 사용하여 [표
1
-
8
]을 얻을 수 있다.
library(descr)
x_tab <- CrossTable(lc_loans$grade, lc_loans$status,
prop.c=FALSE, prop.chisq=FALSE, prop.t=FALSE)
표
1-8
대출 등급과 상황에 대한 분할표
Grade Fully
paid Current Late Charged
off Total
A 20715 52058 494 1588 74855
0
.
277 0
.
695 0
.
007 0
.
021 0
.
161
B 31782 97601 2149 5384 136916
0
.
232 0
.
713 0
.
016 0
.
039 0
.
294
C 23773 92444 2895 6163 125275
0
.
190 0
.
738 0
.
023 0
.
049 0
.
269
D 14036 55287 2421 5131 76875
0
.
183 0
.
719 0
.
031 0
.
067 0
.
165
E 6089 25344 1421 2898 35752
0
.
170 0
.
709 0
.
040 0
.
081 0
.
077
F 2376 8675 621 1556 13228
0
.
180 0
.
656 0
.
047 0
.
118 0
.
028
G 655 2042 206 419 3322 ...