# \donttest{
data(mock_env_data)
split_data <- list(
train = mock_env_data[1:80, ],
apply = mock_env_data[81:100, ]
)
params <- load_params()
variables <- c("day_julian", "weekday", "hour", params$meteo_variables)
res <- run_lightgbm(
train = mock_env_data[1:80, ],
test = mock_env_data[81:100, ], params$lightgbm, alpha = 0.9,
calc_shaps = FALSE
)
prediction <- res$dt_predictions
model <- res$model
# }
Run the code above in your browser using DataLab