使用 ReporteRs 将 lmer 摘要信息输出到 word答案

【问题标题】：output lmer summary information to word using ReporteRs使用 ReporteRs 将 lmer 摘要信息输出到 word
【发布时间】：2015-04-27 05:37:07
【问题描述】：

我正在使用R 中的包ReporteRs 将统计测试的结果和绘图输出到Word 2010。

我正在使用lme4包中的lmer做一些分析，我想将summary(foo.lmer)的结果输出到Word。我希望捕获 lmerMod 对象中的所有内容并将其放入 Word。例如，这是我的summary(foo.lmer) 结果：

Linear mixed model fit by REML ['lmerMod']
Formula: value ~ Drug * Time + (Time + 1 | ID)
Data: DWeight.Female

REML criterion at convergence: 2296.9

Scaled residuals: 
    Min      1Q  Median      3Q     Max 
-3.3165 -0.6132  0.0343  0.6476  2.3088 

Random effects:
Groups   Name        Variance  Std.Dev. Corr
    ID   (Intercept) 573.98186 23.9579      
         Time          0.07738  0.2782  0.29
Residual              15.61168  3.9512      
Number of obs: 360, groups:  ID, 40

Fixed effects:
                 Estimate Std. Error t value
(Intercept)     270.44441    5.83694   46.33
Drug              1.24479    4.11450    0.30
Time              1.30481    0.07641   17.08
Drug:Time        -0.11055    0.05386   -2.05

Correlation of Fixed Effects:
        (Intr)   Drug  Time  
Drug    -0.758              
Time     0.211 -0.160       
Drug:Tm -0.160  0.211 -0.758

如何使用固定宽度和硬回车存储此信息，以便我可以使用 ReporteRs 输出此信息？我可以复制和粘贴，但我正在尝试自动输出，而且我经常重写输出的 Word 文档。

固定效果输出是最重要的部分，但是将所有输出复制到 Word 中会非常有用。

更新和解决 感谢在回复中使用 capture.output 的建议，这段代码对我有用，仍然使用 ReporteRs：

 D1male.Results <- capture.output(summary(D1Male.lmer))
 myBWdoc = docx()
 myBWdoc = addTitle( myBWdoc, "Drug 1 Results", level = 1 )
 myBWdoc = addTitle( myBWdoc, "Repeated Measures Models", level = 2 )
 myBWdoc = addParagraph( myBWdoc, D1male.Results)

如果您想将您的回复作为答案，我可以接受并投票。

【问题讨论】：

你试过 capture.output() 函数了吗？类似 outputmodel
感谢您的建议，我会将信息添加到我的问题中，以帮助其他需要解决此问题的人。
不用了，谢谢。很高兴我能帮上忙。我是 ReporteRs 软件包的超级粉丝。

标签： r ms-word lmer reporters

【解决方案1】：

尝试使用 capture.output() 函数。像这样：

Results <- capture.output(summary(your.lmer.model))

它将摘要信息存储在新变量中。之后，您可以在例如ReporterRs 段落函数。

【讨论】：

很高兴您的回答是正确的并获得了赞成票。感谢您的帮助！