speed up prepare_data() helper

[simonpcouch]

Together with #934, puts us under 100% overhead in the causal estimate bootstrapping example. :)

With main dev:

library(tidymodels)

lr <- fit(logistic_reg(), Class ~ ., two_class_dat)

bench::mark(
  old = predict(lr, two_class_dat, type = "prob")
)
#> # A tibble: 1 × 6
#>   expression      min   median `itr/sec` mem_alloc `gc/sec`
#>   <bch:expr> <bch:tm> <bch:tm>     <dbl> <bch:byt>    <dbl>
#> 1 old          3.01ms   3.12ms      305.    3.62MB     6.27

With this PR:

#> # A tibble: 1 × 6
#>   expression      min   median `itr/sec` mem_alloc `gc/sec`
#>   <bch:expr> <bch:tm> <bch:tm>     <dbl> <bch:byt>    <dbl>
#> 1 new          2.14ms   2.44ms      398.   84.78KB     6.19

^{Created on 2023-03-20 with reprex v2.0.2}

[hfrick]

Looks good, I would just suggest changing the name on one object since remove_intercept a) suggests a boolean and b) is only a part of that object (the whole tibble on encodings).

[simonpcouch]

Perfect, thanks. :)

[github-actions]

This pull request has been automatically locked. If you believe you have found a related problem, please file a new issue (with a reprex: https://reprex.tidyverse.org) and link to this issue.