Plot woes — gg_woes • risk3r

Plot woes

Usage

gg_woes(
  woes,
  variable = "posprob",
  color_bar = "gray75",
  color_line = "#e22d36",
  ...
)

Arguments

woes: woes
variable: variable
color_bar: color_bar
color_line: color_line
...: ...

Examples


data("woes")

woes <- head(woes)

pps <- gg_woes(woes)
#> id_client (IV = 0.42%)
#> sex (IV = 2.60%)
#> marital_status (IV = 9.60%)
#> age (IV = 19.40%)
#> flag_res_phone (IV = 7.54%)
#> area_code_res_phone (IV = 4.17%)

if(require(patchwork)){

  purrr::reduce(pps, `+`)  &
     ggplot2::theme(
       axis.text.x = ggplot2::element_text(size = 7),
       axis.text.y = ggplot2::element_text(size = 7)
       )

}
#> Loading required package: patchwork


gg_woes(woes, variable = "woe")
#> id_client (IV = 0.42%)
#> sex (IV = 2.60%)
#> marital_status (IV = 9.60%)
#> age (IV = 19.40%)
#> flag_res_phone (IV = 7.54%)
#> area_code_res_phone (IV = 4.17%)
#> $id_client

#> 
#> $sex

#> 
#> $marital_status

#> 
#> $age

#> 
#> $flag_res_phone

#> 
#> $area_code_res_phone

#> 

gg_woes(woes, variable = "bin_iv")
#> id_client (IV = 0.42%)
#> sex (IV = 2.60%)
#> marital_status (IV = 9.60%)
#> age (IV = 19.40%)
#> flag_res_phone (IV = 7.54%)
#> area_code_res_phone (IV = 4.17%)
#> $id_client

#> 
#> $sex

#> 
#> $marital_status

#> 
#> $age

#> 
#> $flag_res_phone

#> 
#> $area_code_res_phone

#>