如何在{xaringan}演示文稿中缩小{stargazer}表？

问题描述

我正在制作我的第一个忍者演示文稿，其中包括一张从幻灯片上滑下来的观星台（太长了）。有什么建议吗？

可放入{xaringan}中的表格。

library(tidyverse)
library(stargazer)
df<-tibble(y=sample(1:100,500,replace=TRUE),x=sample(1:5,x2=sample(1:3,x3=sample(1:15,x4=sample(LETTERS[1:5],replace=TRUE))
stargazer(lm(df$y~df$x+df$x2+df$x3+df$x4),type="html")

还有html输出，供那些只想将其放入的人使用

<table style="text-align:center"><tr><td colspan="2" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left"></td><td><em>Dependent variable:</em></td></tr>
<tr><td></td><td colspan="1" style="border-bottom: 1px solid black"></td></tr>
<tr><td style="text-align:left"></td><td>y</td></tr>
<tr><td colspan="2" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left">x</td><td>-1.175</td></tr>
<tr><td style="text-align:left"></td><td>(0.902)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">x2</td><td>-0.742</td></tr>
<tr><td style="text-align:left"></td><td>(1.580)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">x3</td><td>0.028</td></tr>
<tr><td style="text-align:left"></td><td>(0.309)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">x4B</td><td>0.660</td></tr>
<tr><td style="text-align:left"></td><td>(4.181)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">x4C</td><td>-2.830</td></tr>
<tr><td style="text-align:left"></td><td>(4.283)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">x4D</td><td>2.581</td></tr>
<tr><td style="text-align:left"></td><td>(4.221)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">x4E</td><td>1.637</td></tr>
<tr><td style="text-align:left"></td><td>(4.100)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td style="text-align:left">Constant</td><td>55.593<sup>***</sup></td></tr>
<tr><td style="text-align:left"></td><td>(5.977)</td></tr>
<tr><td style="text-align:left"></td><td></td></tr>
<tr><td colspan="2" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left">Observations</td><td>500</td></tr>
<tr><td style="text-align:left">R<sup>2</sup></td><td>0.008</td></tr>
<tr><td style="text-align:left">Adjusted R<sup>2</sup></td><td>-0.006</td></tr>
<tr><td style="text-align:left">Residual Std. Error</td><td>29.048 (df = 492)</td></tr>
<tr><td style="text-align:left">F Statistic</td><td>0.575 (df = 7; 492)</td></tr>
<tr><td colspan="2" style="border-bottom: 1px solid black"></td></tr><tr><td style="text-align:left"><em>Note:</em></td><td style="text-align:right"><sup>*</sup>p<0.1; <sup>**</sup>p<0.05; <sup>***</sup>p<0.01</td></tr>
</table>

解决方法

有很多方法可以减小HTML表的大小。我在这里建议两件事：

1. 在single.row = T中设置stargazer::stargazer()。这样一来，您就可以在同一行上获得系数估计值和相应的标准误差，从而节省空间。

2. 减小字体大小。为此，您需要一些CSS，例如table { font-size: 12px; }。您可以将其嵌入代码块中：

   ```{css,echo = F}
   table {
     font-size: 12px;     
   }
   ```
   

   请注意，这将更改演示文稿中 all 表的字体大小。一种更通用的方法是为特定的表格样式定义一个类，而不是将该类分配给幻灯片：

   ```{css,echo = F}
   .regression table {
     font-size: 12px;     
   }
   ```
   
   ---
   class: regression
   # Hello World 
   
   < code producing the table >
   

使用默认的Xaringan模板，结果如下：