Should we change the underlying mechanism that creates the specifications to call internal functions?

[spsanderson]

> library(tidyAML)
> library(dplyr)
> 
> lm_regression_linear_reg <- function(.pe, .pm) {
+   parsnip::linear_reg() |>
+     parsnip::set_mode(.pm) |>
+     parsnip::set_engine(.pe)
+ }
> 
> mod_tbl <- make_regression_base_tbl() |>
+   slice(1) |>
+   mutate(
+     fns_call = paste(.parsnip_engine, .parsnip_mode, .parsnip_fns, sep = "_")
+   ) |>
+   mutate(
+     .mod_spec = list(match.fun(fns_call)(.parsnip_engine, .parsnip_mode))
+   ) |>
+   select(-fns_call)
> 
> mod_tbl
# A tibble: 1 × 4
  .parsnip_engine .parsnip_mode .parsnip_fns .mod_spec
  <chr>           <chr>         <chr>        <list>   
1 lm              regression    linear_reg   <spec[+]>
> mod_tbl[[".mod_spec"]][[1]]
Linear Regression Model Specification (regression)

Computational engine: lm