library(ggplot2)
library(magrittr) # pipe operator
# \dontshow{
data.table::setDTthreads(2) # restricts number of cores used on CRAN
# }
scores <- score(example_quantile) %>%
summarise_scores(by = c("model", "target_type")) %>%
summarise_scores(fun = signif, digits = 2)
plot_score_table(scores, y = "model", by = "target_type") +
facet_wrap(~target_type, ncol = 1)
# can also put target description on the y-axis
plot_score_table(scores,
y = c("model", "target_type"),
by = "target_type")
Run the code above in your browser using DataLab