Report estimates across different models
Report estimates across different models
Combine(x, ...)
x |
list of model objects |
... |
additional arguments to lower-level functions |
Klaus K. Holst
data(serotonin) m1 <- lm(cau ~ age*gene1 + age*gene2,data=serotonin) m2 <- lm(cau ~ age + gene1,data=serotonin) m3 <- lm(cau ~ age*gene2,data=serotonin) Combine(list(A=m1,B=m2,C=m3),fun=function(x) c("_____"="",R2=" "%++%format(summary(x)$r.squared,digits=2)))
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.