library("matchatr")
set.seed(1)
df <- data.frame(case = rep(c(1, 0), each = 100), x = rbinom(200, 1, 0.4))
fit <- matcha(df, outcome = "case", exposure = "x", design = unmatched_cc())
print(contrast(fit, type = "or"))<matchatr_result>
Estimator: logistic (engine: glm_logistic)
Estimand: conditional OR
Contrast: Odds ratio
CI method: model
N: 200
Contrasts:
comparison estimate se ci_lower ci_upper
<char> <num> <num> <num> <num>
1: x 1.131579 0.324955 0.6445338 1.986662