Get Final Trained Models

Get Final Trained Models

get_trained_models(run_info)

Arguments

run_info

run info using the set_run_info() function

Value

table of final trained models

Examples

# \donttest{
data_tbl <- timetk::m4_monthly %>%
  dplyr::rename(Date = date) %>%
  dplyr::mutate(id = as.character(id)) %>%
  dplyr::filter(
    id == "M2",
    Date >= "2012-01-01",
    Date <= "2015-06-01"
  )

run_info <- set_run_info()
#> Finn Submission Info
#> • Experiment Name: finn_fcst
#> • Run Name: finn_fcst-20240429T224832Z
#> 

prep_data(run_info,
  input_data = data_tbl,
  combo_variables = c("id"),
  target_variable = "value",
  date_type = "month",
  forecast_horizon = 3,
  recipes_to_run = "R1"
)
#> ℹ Prepping Data
#> ✔ Prepping Data [408ms]
#> 

prep_models(run_info,
  models_to_run = c("arima", "ets"),
  num_hyperparameters = 1
)
#> ℹ Creating Model Workflows
#> ✔ Creating Model Workflows [78ms]
#> 
#> ℹ Creating Model Hyperparameters
#> ✔ Creating Model Hyperparameters [73ms]
#> 
#> ℹ Creating Train Test Splits
#> ℹ Turning ensemble models off since no multivariate models were chosen to run.
#> ℹ Creating Train Test Splits

#> ✔ Creating Train Test Splits [352ms]
#> 

train_models(run_info,
  run_global_models = FALSE,
  run_local_models = TRUE
)
#> ℹ Training Individual Models
#> → A | warning: A correlation computation is required, but the inputs are size zero or one and
#>                the standard deviation cannot be computed. `NA` will be returned.
#> ℹ Training Individual Models

#> There were issues with some computations   A: x1
#> → B | warning: A correlation computation is required, but `estimate` is constant and has 0
#>                standard deviation, resulting in a divide by 0 error. `NA` will be returned.
#> There were issues with some computations   A: x1

#> There were issues with some computations   A: x2   B: x2
#> There were issues with some computations   A: x3   B: x2
#> 
#> ℹ Training Individual Models

#> → A | warning: A correlation computation is required, but the inputs are size zero or one and
#>                the standard deviation cannot be computed. `NA` will be returned.
#> ℹ Training Individual Models

#> → B | warning: A correlation computation is required, but `estimate` is constant and has 0
#>                standard deviation, resulting in a divide by 0 error. `NA` will be returned.
#> ℹ Training Individual Models

#> There were issues with some computations   A: x2   B: x3
#> There were issues with some computations   A: x3   B: x7
#> 
#> ℹ Training Individual Models

#> ✔ Training Individual Models [9.8s]
#> 

final_models(run_info,
  average_models = FALSE
)
#> ℹ Selecting Best Models
#> ✔ Selecting Best Models [201ms]
#> 

models_tbl <- get_trained_models(run_info)
# }