# NOT RUN {
library(officer)
library(flextable)
library(nlme)
library(lme4)
data(datafake)
#Model info for lme model
mod=lme(y_numeric~GROUP+TIMEPOINT,random=~1|SUBJID,data=datafake,na.action=na.omit)
# Show in HTML (can be inserted in an R markdown or a MS Word document)
report.modelinfo(mod)
#Model info for lmer model
mod=lmer(y_numeric~GROUP+TIMEPOINT+(1|SUBJID),data=datafake,na.action=na.omit)
report.modelinfo(mod)
# }
Run the code above in your browser using DataLab