Credible intervals for treatment effect

extract_CI(
  model,
  unit = NULL,
  pars = "randomization_factorHighFlownasaloxygen"
)