# NOT RUN {
scores <- scoringutils::eval_forecasts(scoringutils::quantile_example_data_wide,
by = c("model", "id", "horizon"),
summarise_by = c("model", "horizon"))
scoringutils::score_table(scores, y = "model", facet_formula = ~ horizon,
ncol = 1)
scoringutils::score_table(scores, y = c("model", "horizon"))
# yields the same result in this case
scoringutils::score_table(scores)
# }
Run the code above in your browser using DataLab