Examples
samples <- data.frame(value = 1:10, type = "car")
summarised <- calc_CrIs(samples,
summarise_by = "type",
CrIs = c(seq(0.05, 0.95, 0.05))
)
extract_CrIs(summarised)
#> [1] 95 90 85 80 75 70 65 60 55 50 45 40 35 30 25 20 15 10 5
samples <- data.frame(value = 1:10, type = "car")
summarised <- calc_CrIs(samples,
summarise_by = "type",
CrIs = c(seq(0.05, 0.95, 0.05))
)
extract_CrIs(summarised)
#> [1] 95 90 85 80 75 70 65 60 55 50 45 40 35 30 25 20 15 10 5