# NOT RUN {
library(parsnip)
library(recipes)
library(magrittr)
model <- linear_reg() %>%
set_engine("lm")
unfit_wf <- workflow() %>%
add_model(model) %>%
add_formula(mpg ~ cyl + log(disp))
partially_fit_wf <- .fit_pre(unfit_wf, mtcars)
fit_workflow <- .fit_model(partially_fit_wf, control_workflow())
# }
Run the code above in your browser using DataLab