如何用Rmd和Knit HTML显示“漂亮”的glm和multinom表？

Question

当我执行multinom reg时我很难用Rmd和Knit HTLM（Rstudio）得到一个很好的总结。我想知道如何得到一个很好的总结，好像我在LaTeX中使用stargazer包...（参见printscreen）

摘要输出难以阅读！

总结很好，很容易用观星者阅读！

Answer 1

您可以使用xtable执行此操作，Title ======================================================== My regression table. ```{r chunkTest, echo=FALSE, results='asis'} library(xtable) data(tli) fm3 <- glm(disadvg ~ ethnicty*grade, data = tli, family = binomial()) fm3.table <- xtable(fm3) # Coefficients print(fm3.table, type = "html") # Analysis of variance. print(xtable(anova(fm3)), type = "html") ``` 可以将表直接写入HTML。这是一个示例降价文档：

texreg

---

如果你想要星星，有一个名为xtable的可爱包，它可以输出星星，还有一些其他很好的功能```{r chunkTest1, echo=FALSE, results='asis'} library(texreg) htmlreg(fm3,single.row=TRUE) ``` 没有。

{{1}}

Answer 2

您还可以在stargazer中设置选项以生成HTML代码。

library(nnet) # For multinomial regression
library(stargazer)

df <- data.frame(Y = sample(c("A","B","C"), replace=T, size=1000), 
                 X = round(runif(1000)))
reg <- multinom(Y ~ X, data=df)
stargazer(reg, type='html')

＆＃13;

＆＃13;

<table style="text-align:center"><tr><td colspan="3" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left"></td><td colspan="2"><em>Dependent variable:</em></td></tr>
<tr><td></td><td colspan="2" style="border-bottom: 1px solid black"></td></tr>
<tr><td style="text-align:left"></td><td>B</td><td>C</td></tr>
<tr><td style="text-align:left"></td><td>(1)</td><td>(2)</td></tr>
<tr><td colspan="3" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left">X</td><td>-0.060</td><td>-0.142</td></tr>
<tr><td style="text-align:left"></td><td>(0.155)</td><td>(0.152)</td></tr>
<tr><td style="text-align:left"></td><td></td><td></td></tr>
<tr><td style="text-align:left">Constant</td><td>-0.148</td><td>-0.047</td></tr>
<tr><td style="text-align:left"></td><td>(0.111)</td><td>(0.108)</td></tr>
<tr><td style="text-align:left"></td><td></td><td></td></tr>
<tr><td colspan="3" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left">Akaike Inf. Crit.</td><td>2,198.764</td><td>2,198.764</td></tr>
<tr><td colspan="3" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left"><em>Note:</em></td><td colspan="2" style="text-align:right"><sup>*</sup>p<0.1; <sup>**</sup>p<0.05; <sup>***</sup>p<0.01</td></tr>
</table>

＆＃13;

＆＃13;

＆＃13;