should_fail <- try(required_pkgs(linear_reg(engine = NULL)), silent = TRUE)
should_fail
linear_reg() %>%
set_engine("glmnet") %>%
required_pkgs()
linear_reg() %>%
set_engine("glmnet") %>%
required_pkgs(infra = FALSE)
linear_reg() %>%
set_engine("lm") %>%
fit(mpg ~ ., data = mtcars) %>%
required_pkgs()
Run the code above in your browser using DataLab