data(math)
gm = ~al:an:st
vcc = list(~me+st, ~ve+an, ~al)
ecc = list(~me:ve+me:al, ~ve:al+al:st)
m1 <- rcox(gm=gm, vcc=vcc, ecc=ecc, data=math, method='matching')
m2 <- rcox(gm=gm, vcc=vcc, ecc=ecc, data=math, method='scoring')
m3 <- rcox(gm=gm, vcc=vcc, ecc=ecc, data=math, method='ipm')
m1
m2
m3
summary(m1)
summary(m2)
summary(m3)
coef(m1)
coef(m2)
coef(m3)
vcov(m1)
vcov(m2)
vcov(m3)
Run the code above in your browser using DataLab