library(magrittr) # pipe operator
score(example_quantile) %>%
add_coverage(by = c("model", "target_type")) %>%
summarise_scores(by = c("model", "target_type")) %>%
summarise_scores(fun = signif, digits = 2)
Run the code above in your browser using DataLab