if (FALSE) { # requireNamespace("cem", quietly = TRUE)
library(cem); data("lalonde", package = "cobalt")
## Coarsened exact matching
cem.out <- cem("treat", data = lalonde, drop = "re78")
bal.tab(cem.out, data = lalonde, un = TRUE,
stats = c("m", "k"))
}
Run the code above in your browser using DataLab