Merge pull request #321 from tidymodels/engine-specific_defaults

Add defaults to engine specific params in model docs

Author: topepo

NAMESPACE

@@ -102,7 +102,6 @@ export(boost_tree)
 export(check_empty_ellipse)
 export(check_final_param)
 export(control_parsnip)
-export(convert_args)
 export(convert_stan_interval)
 export(decision_tree)
 export(eval_args)

R/aaa.R

@@ -30,33 +30,6 @@ convert_stan_interval <- function(x, level = 0.95, lower = TRUE) {
   res
 }
 
-#' Make a table of arguments
-#' @param model_name A character string for the model
-#' @keywords internal
-#' @export
-convert_args <- function(model_name) {
-  envir <- get_model_env()
-
-  args <-
-    ls(envir) %>%
-    tibble::tibble(name = .) %>%
-    dplyr::filter(grepl("args", name)) %>%
-    dplyr::mutate(model = sub("_args", "", name),
-                  args  = purrr::map(name, ~envir[[.x]])) %>%
-    tidyr::unnest(args) %>%
-    dplyr::select(model:original)
-
-  convert_df <- args %>%
-    dplyr::filter(grepl(model_name, model)) %>%
-    dplyr::select(-model) %>%
-    tidyr::pivot_wider(names_from = engine, values_from = original)
-
-  convert_df %>%
-    knitr::kable(col.names = paste0("**", colnames(convert_df), "**"))
-
-}
-
-
 # ------------------------------------------------------------------------------
 # nocov
 

R/boost_tree_data.R

@@ -338,8 +338,8 @@ set_model_arg(
 set_model_arg(
   model = "boost_tree",
   eng = "spark",
-  parsnip = "min_info_gain",
-  original = "loss_reduction",
+  parsnip = "loss_reduction",
+  original = "min_info_gain",
   func = list(pkg = "dials", fun = "loss_reduction"),
   has_submodel = FALSE
 )