5

glhtR のオブジェクトの結果を LaTeX テーブルにエクスポートしたいと考えています。

たとえば、ライブラリ「stargazer」を使用すると、きれいにフォーマットされたlmeオブジェクトの LaTeX テーブルを生成できます。

glhtで作成された要約など、オブジェクトの要約の出力から自動的に作成された LaTeX テーブルが欲しい

>summary(glht(dataModel))
Linear Hypotheses:
                                                                        Estimate Std.     Error z value Pr(>|z|)    
Group1 - Group2 == 0   -0.14007    0.01589  -8.813   <0.001 "***"
Group1 - Group3 == 0    -0.09396    0.01575  -5.965   <0.001 ***
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 
(Adjusted p values reported -- single-step method)

stargazerxtabletexregreporttoolsmemiscおよびのようなライブラリを認識してapsrtableいますが、どれも glht の仕事をしていません :(

そのためのライブラリがあるかどうかについてのヒントはありますか?

4

2 に答える 2

7

以下のコード例で答えを見つけることができます。

multcomp:::print.summary.glht 

x<-glht(...)    
pq<-summary(x)$test

mtests <- cbind(pq$coefficients, pq$sigma, pq$tstat, pq$pvalues)
error <- attr(pq$pvalues, "error")
pname <- switch(x$alternativ, 
                 less = paste("Pr(<", ifelse(x$df ==0, "z", "t"), ")", sep = ""), 
                 greater = paste("Pr(>", ifelse(x$df == 0, "z", "t"), ")", sep = ""), 
                 two.sided = paste("Pr(>|", ifelse(x$df == 0, "z", "t"), "|)", sep = ""))                                                                   
colnames(mtests) <- c("Estimate", "Std. Error", ifelse(x$df ==0, "z value", "t value"), pname)

xtable(mtests)
于 2013-11-26T19:41:52.537 に答える