вывод сводной информации lmer в слово с помощью ReporteRs

Я использую пакет ReporteRs в R для вывода результатов статистических тестов и графиков в Word 2010.

Я использую lmer в пакете lme4 для анализа и хочу вывести результаты 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

Как я могу сохранить эту информацию с фиксированной шириной и жесткими возвратами, чтобы я мог выводить эту информацию с помощью ReporteR? Я мог бы копировать и вставлять, но я пытаюсь автоматизировать вывод и часто переписываю выходной документ 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)

Если вы хотите поместить свой ответ в качестве ответа, я могу принять его и проголосовать за него.


r ms-word reporters lmer
person Michelle    schedule 27.04.2015    source источник
comment
Вы пробовали использовать функцию capture.output()? Что-то вроде outputmodel ‹-capture.output(yourmodel)   -  person rdatasculptor    schedule 27.04.2015
comment
Спасибо за ваше предложение, я добавлю информацию к моему вопросу, чтобы помочь всем, кому это нужно.   -  person Michelle    schedule 27.04.2015
comment
Спасибо, не надо. Рад, что смог помочь. Я большой поклонник пакета ReporteRs.   -  person rdatasculptor    schedule 27.04.2015

Ответы (1)


arrow_upward
3
arrow_downward

Попробуйте использовать функцию capture.output(). Как это:

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

Он сохраняет сводную информацию в новой переменной. После этого вы можете использовать его, например. Функции абзаца ReporteR.

person rdatasculptor    schedule 27.04.2015
comment
Рад принять ваш ответ как правильный и с положительным голосованием. Спасибо за вашу помощь! - person Michelle; 28.04.2015