Curva de lift
Examples
set.seed(1); y <- rbinom(200, 1, 0.3); s <- y * 0.5 + runif(200)
rnp_curva_lift(y, s, positivo = 1)$tabela
#> # A tibble: 10 × 3
#> grupo taxa_grupo lift
#> <int> <dbl> <dbl>
#> 1 1 1 3.23
#> 2 2 0.5 1.61
#> 3 3 0.3 0.968
#> 4 4 0.45 1.45
#> 5 5 0.5 1.61
#> 6 6 0.35 1.13
#> 7 7 0 0
#> 8 8 0 0
#> 9 9 0 0
#> 10 10 0 0