## Warning: package 'lares' was built under R version 4.1.2
##
## -- Column specification --------------------------------------------------------
## cols(
## age = col_double(),
## job = col_character(),
## marital = col_character(),
## education = col_character(),
## default = col_character(),
## balance = col_double(),
## housing = col_character(),
## loan = col_character(),
## contact = col_character(),
## day = col_double(),
## month = col_character(),
## duration = col_double(),
## campaign = col_double(),
## pdays = col_double(),
## previous = col_double(),
## poutcome = col_character(),
## y = col_character(),
## score = col_double()
## )
## The following object is masked from package:MASS:
##
## housing
## [1] "age" "job" "marital" "education" "default" "balance"
## [7] "housing" "loan" "contact" "day" "month" "duration"
## [13] "campaign" "pdays" "previous" "poutcome" "y" "score"
## # A tibble: 2 x 2
## y n
## <chr> <int>
## 1 no 39922
## 2 yes 5289
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## No scatter mode specifed:
## Setting the mode to markers
## Read more about this attribute -> https://plotly.com/r/reference/#scatter-mode
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
## Warning in RColorBrewer::brewer.pal(N, "Set2"): minimal value for n is 3, returning requested palette with 3 different levels
##
## Call:
## glm(formula = score ~ duration + balance + job + previous + contact +
## campaign + default + month + loan + education + marital +
## day + poutcome + housing, family = binomial, data = test_data)
##
## Deviance Residuals:
## Min 1Q Median 3Q Max
## -4.1456 -0.3772 -0.2529 -0.1491 3.6093
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) -2.325e+00 2.458e-01 -9.462 < 2e-16 ***
## duration 4.058e-03 1.169e-04 34.712 < 2e-16 ***
## balance 4.401e-06 9.640e-06 0.457 0.648021
## jobblue-collar -4.298e-01 1.330e-01 -3.232 0.001229 **
## jobentrepreneur -2.992e-01 2.188e-01 -1.367 0.171536
## jobhousemaid -8.142e-01 2.708e-01 -3.007 0.002640 **
## jobmanagement -3.774e-01 1.344e-01 -2.808 0.004984 **
## jobretired 1.163e-01 1.594e-01 0.730 0.465650
## jobself-employed -4.900e-01 2.092e-01 -2.342 0.019175 *
## jobservices -3.384e-01 1.508e-01 -2.243 0.024887 *
## jobstudent 1.077e-01 1.984e-01 0.543 0.587207
## jobtechnician -3.757e-01 1.257e-01 -2.988 0.002808 **
## jobunemployed -3.636e-01 2.023e-01 -1.797 0.072320 .
## jobunknown -6.572e-01 4.276e-01 -1.537 0.124313
## previous 3.081e-02 2.094e-02 1.471 0.141234
## contacttelephone -1.974e-01 1.388e-01 -1.423 0.154874
## contactunknown -1.718e+00 1.317e-01 -13.038 < 2e-16 ***
## campaign -1.174e-01 1.970e-02 -5.961 2.51e-09 ***
## defaultyes 2.863e-02 3.066e-01 0.093 0.925613
## monthaug -8.114e-01 1.470e-01 -5.519 3.41e-08 ***
## monthdec 5.569e-01 3.394e-01 1.641 0.100789
## monthfeb -1.964e-01 1.666e-01 -1.179 0.238569
## monthjan -1.186e+00 2.133e-01 -5.560 2.69e-08 ***
## monthjul -7.969e-01 1.426e-01 -5.591 2.26e-08 ***
## monthjun 5.405e-01 1.721e-01 3.141 0.001683 **
## monthmar 1.646e+00 2.189e-01 7.519 5.50e-14 ***
## monthmay -2.663e-01 1.330e-01 -2.002 0.045319 *
## monthnov -9.559e-01 1.571e-01 -6.084 1.17e-09 ***
## monthoct 6.262e-01 2.023e-01 3.095 0.001967 **
## monthsep 9.713e-01 2.236e-01 4.343 1.40e-05 ***
## loanyes -3.955e-01 1.084e-01 -3.649 0.000263 ***
## educationsecondary 1.338e-01 1.190e-01 1.125 0.260646
## educationtertiary 4.544e-01 1.378e-01 3.299 0.000972 ***
## educationunknown 3.085e-01 1.898e-01 1.625 0.104132
## maritalmarried -1.973e-01 1.067e-01 -1.849 0.064507 .
## maritalsingle 6.777e-02 1.148e-01 0.590 0.554960
## day 9.465e-03 4.582e-03 2.066 0.038854 *
## poutcomeother 2.493e-01 1.697e-01 1.469 0.141792
## poutcomesuccess 2.254e+00 1.493e-01 15.095 < 2e-16 ***
## poutcomeunknown 7.098e-02 1.221e-01 0.581 0.561046
## housingyes -8.055e-01 8.026e-02 -10.035 < 2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for binomial family taken to be 1)
##
## Null deviance: 9610.3 on 13474 degrees of freedom
## Residual deviance: 6401.3 on 13434 degrees of freedom
## AIC: 6483.3
##
## Number of Fisher Scoring iterations: 6
## [1] "duration" "balance" "jobblue-collar"
## [4] "jobentrepreneur" "jobhousemaid" "jobretired"
## [7] "jobstudent" "contactunknown" "campaign"
## [10] "monthaug" "monthdec" "monthjan"
## [13] "monthjul" "monthjun" "monthmar"
## [16] "monthmay" "monthnov" "monthoct"
## [19] "monthsep" "loanyes" "educationsecondary"
## [22] "educationtertiary" "maritalmarried" "day"
## [25] "poutcomesuccess" "housingyes"
## [1] "duration" "jobblue-collar" "jobhousemaid"
## [4] "jobmanagement" "jobself-employed" "jobservices"
## [7] "jobtechnician" "contactunknown" "campaign"
## [10] "monthaug" "monthjan" "monthjul"
## [13] "monthjun" "monthmar" "monthmay"
## [16] "monthnov" "monthoct" "monthsep"
## [19] "loanyes" "educationtertiary" "day"
## [22] "poutcomesuccess" "housingyes"
## GVIF Df GVIF^(1/(2*Df))
## duration 1.118680 1 1.057677
## balance 1.040016 1 1.019812
## job 3.067834 11 1.052274
## previous 1.758639 1 1.326137
## contact 1.810297 2 1.159945
## campaign 1.103962 1 1.050696
## default 1.014466 1 1.007207
## month 3.566735 11 1.059506
## loan 1.060489 1 1.029801
## education 2.234100 3 1.143362
## marital 1.186907 2 1.043768
## day 1.357390 1 1.165071
## poutcome 1.985265 3 1.121080
## housing 1.416180 1 1.190033
## no yes
## 0 11631 1039
## 1 296 509
## no yes
## 0 11631 1039
## 1 296 509
## no yes
## 0 11631 1039
## 1 296 509
## Warning in .font_global(font, quiet = FALSE): Font 'Arial Narrow' is not
## installed, has other name, or can't be found

## [1] 0.9041126
## [1] 0.9208951
## [1] 0.6609589

## ROC Curve Plot rendered with sampled data...

## No trace type specified:
## Based on info supplied, a 'scatter' trace seems appropriate.
## Read more about this trace type -> https://plotly.com/r/reference/#scatter
## No scatter mode specifed:
## Setting the mode to markers
## Read more about this attribute -> https://plotly.com/r/reference/#scatter-mode
## Warning: `line.width` does not currently support multiple values.