huxtableのhuxregを使ってlmの結果をワードに出力

 

install.packages("huxtable")

require("huxtable")

 

lm.res1 <- lm(mpg ~ wt , data = mtcars) 

lm.res2 <- lm(mpg ~ wt + qsec, data = mtcars)

 

lm.hux <- huxreg(lm.res1, lm.res2, number_format = "%.4f")

lm.hux

 

quick_docx(lm.hux, file="lmHuxSample.docx")

 

以下のマニュアルを読むと結構楽しい。

https://cran.r-project.org/web/packages/huxtable/vignettes/huxreg.html