Closed wwiecek closed 2 years ago
e.g.
library(tidyverse) library(baggr) options(mc.cores = 4) source("R/helpers_results.R") load("transformed_data/stan_inputs_df.rds") bg <- stan_inputs_df$data[[1]] %>% # select(country, end, bsl, treatment) %>% baggr(outcome = "end", group = "country", covariates = "bsl", model = "rubin_full", iter = 500)
SHould also change the print. for when working with meta-regressions, to make sure ppl can recognise when the model is and isn't meta-reg more easily
e.g.