R markdown "texreg"

Question

Я хотел бы получить латексную таблицу результатов регрессии, используя следующие комментарии;

Analysis1 <- glm(y~x, data=data1, family=quasibinomial(link="logit"))  
summary(Analysis1) 
texreg(list(Analysis1),dcolumn = TRUE, booktabs = TRUE, 
     use.packages = TRUE, label = "tab:1", 
     caption = "Regression Estimation Results",float.pos = "hb") 

Однако эти команды «texreg» дают сырой выход вместо чистой таблицы;

\begin{table}[ht] 
\centering 
\begin{tabular}{rrrrr} 
    \hline 
& Estimate & Std. Error & t value & Pr($>$$|$t$|$) \\ 
    \hline 
(Intercept) & 0.7686 & 0.0125 & 61.37 & 0.0000 \\ 
    x & -0.0166 & 0.0069 & -2.41 & 0.0170 \\ 
    \hline 
\end{tabular} 
\end{table} 

Не могли бы вы помочь мне, как я могу получить чистую таблицу результатов регрессии с помощью команды texreg в R?

Answer 1

Вы не представили минимальный автономный пример. Однако, если я использую пример, приведенный на странице справки glm, он, похоже, работает. См. Следующий результат.

library("texreg") # tested with version 1.33.2 

counts <- c(18,17,15,20,10,20,25,13,12) 
outcome <- gl(3,1,9) 
treatment <- gl(3,3) 
Analysis1 <- glm(counts ~ outcome + treatment, family = poisson()) 

texreg(Analysis1, dcolumn = TRUE, booktabs = TRUE, 
    use.packages = TRUE, label = "tab:1", 
    caption = "Regression Estimation Results", float.pos = "hb") 

Это дает следующий результат, который, я считаю, правильный.

\usepackage{booktabs} 
\usepackage{dcolumn} 

\begin{table}[hb] 
\begin{center} 
\begin{tabular}{l D{.}{.}{3.5}@{} } 
\toprule 
       & \multicolumn{1}{c}{Model 1} \\ 
\midrule 
(Intercept) & 3.04^{***} \\ 
       & (0.17)  \\ 
outcome2  & -0.45^{*} \\ 
       & (0.20)  \\ 
outcome3  & -0.29  \\ 
       & (0.19)  \\ 
treatment2  & 0.00  \\ 
       & (0.20)  \\ 
treatment3  & 0.00  \\ 
       & (0.20)  \\ 
\midrule 
AIC   & 56.76  \\ 
BIC   & 57.75  \\ 
Log Likelihood & -23.38  \\ 
Deviance  & 5.13  \\ 
Num. obs.  & 9   \\ 
\bottomrule 
\multicolumn{2}{l}{\scriptsize{$^{***}p<0.001$, $^{**}p<0.01$, $^*p<0.05$}} 
\end{tabular} 
\caption{Regression Estimation Results} 
\label{tab:1} 
\end{center} 
\end{table} 

Если вы получите другой результат, используя один и тот же код, пожалуйста, доложите, который texreg версию вы используете. Если вы используете ту же версию, но ваш собственный пример дает результат, который выглядит по-другому, предоставьте минимальный автономный пример.