betas_binomial <- readRDS("testdata/betas_binomial.rds")
lambda_binomial <- readRDS("testdata/lambda_binomial.rds")