
Marginal treatment effect from reported event counts
Source:R/calc_ALD_stats.R
marginal_treatment_effect.RdComputes the relative treatment effect from aggregate-level data using event counts.
Examples
ald <- data.frame(trt = c("B","C","B","C"),
variable = c(NA, NA, "y", "y"),
statistic = c("N", "N", "sum", "sum"),
value = c(100, 100, 50, 60))
marginal_treatment_effect(ald, ref_trt = "C", comp_trt = "B",
scale = "log_odds", family = "binomial")
#> [1] -0.4054651