# replicate the example from Leemann (2014):
library(memisc)
data(war1800)
if (FALSE) out1 <- StratSel(Y ~ s_wt_re1 + revis1 | dem1 + mixed1 | balanc +
dem2 + mixed2, data=war1800, corr=TRUE)
out2 <- StratSel(Y ~ s_wt_re1 + revis1 | dem1 + mixed1 | balanc +
dem2 + mixed2, data=war1800, corr=FALSE)
setStratSelDefault()
if (FALSE) z <- mtable(out1,out2)
# toLatex(z) for a LaTeX output or just regular table:
Run the code above in your browser using DataLab