一行代码出简洁又美丽的回归表格~
建立回归模型之后,下一步就是将结果制作成表格,再进行汇报或者发表。
通常情况下,需要手动一个个的将参数和p值等摘抄到word。但有时候也需要快速出表,从而直接黏贴到ppt中汇报,或者导出作为论文中的一张图进行发表。
虽然往期文章中(见文章末尾)已介绍过类似的话题,但是今天推荐的代码更加简单,所出的表格也不落下风
。
马上安装并且载入R包:
install.packages("flextable")
library(flextable)
summary(mtcars)
下一步,建立回归方程,将会使用mpg作为因变量,vs, hp, wt作为自变量,并且添加它们间所有的交互项:
mymodel <- lm(mpg ~ vs * hp * wt, data = mtcars) summary(mymodel) 好了,现在可以把数值抄录
共有 0 条评论