我正试图生成对Deviance的逻辑回归分析表的摘要,但结果是我认为是LaTex的一部分。这是我的代码:
m1 <- glm(vote ~ factor(income),
data = nes1992,
family = binomial)
xtable(summary(anova(m1)))
.PDF的输出如下:
\begin{table}[ht]
\centering
\begin{tabular}{rrrrr}
\hline
& Estimate & Std. Error & z value & Pr($>$$|$z$|$) \\
\hline
(Intercept) & -1.1838 & 0.2087 & -5.67 & 0.0000 \\
factor(income)2 & 0.4906 & 0.2555 & 1.92 & 0.0548 \\
factor(income)3 & 0.7509 & 0.2345 & 3.20 & 0.0014 \\
factor(income)4 & 1.1243 & 0.2312 & 4.86 & 0.0000 \\
factor(income)5 & 1.2378 & 0.3125 & 3.96 & 0.0001 \\
\hline
\end{tabular}
\end{table}
我正在处理.Rmd文件,并将文档编织为.PDF文件。我不确定我是在做错什么,还是需要解决更大的技术问题。任何帮助表示赞赏。
我更新了代码以反映文档要求,但是在打印时仍会得到未格式化的代码块:
m1table <- xtable(summary(m1))
print(m1table, type = "latex")