r - 如何更改 Stargazer HTML 表格宽度？

Question

我真的很喜欢 stargazer 包使用的表格样式。这些表格使用 Knitr 和 Rstudio 以 pdf 格式呈现。然而，当我尝试将我的 .Rmd 编​​织到一个 html 页面时，表格最终被挤压在一起。块选项 fig.width没有帮助，观星者选项也没有帮助 column.sep.width .有什么方法可以更改表格宽度，或者是否有其他工作流程可以在 html 中获得漂亮的汇总表？

可重现的例子:

{r test, results = "asis"}

stargazer::stargazer(attitude,
                 type = "html",
                 digits = 2,
                 summary.stat = c("mean","sd","median","min", "max"))

Answer 1

我严重偏向htmlTable::htmlTable ，但无论如何我都会添加这个。 htmlTable顾名思义，仅用于制作表格，因此不包括观星者的所有花里胡哨，但此功能有许多用于自定义输出的选项。因此，您可能需要做额外的工作才能获得需要放入表格中的输出。

与其他答案类似，您可以使用 css 来操纵表格的样式。例如，您可以将 css 传递给 css.cell :

---
output: html_document
---

```{r test, results='asis', include=FALSE}
stargazer::stargazer(attitude,
                 type = "html",
                 digits = 2,
                 summary.stat = c("mean","sd","median","min", "max"))
```

```{r}
## apply a list of functions to a list or vector
f <- function(X, FUN, ...) {
  fn <- as.character(match.call()$FUN)[-1]
  out <- sapply(FUN, mapply, X, ...)
  setNames(as.data.frame(out), fn)
}

(out <- round(f(attitude, list(mean, sd, median, min, max)), 2))
```

```{r, results='asis'}
library('htmlTable')
htmlTable(out,  cgroup = 'Statistic', n.cgroup = 5, caption = 'Table 1: default')

htmlTable(out, cgroup = 'Statistic', n.cgroup = 5, caption = 'Table 1: padding',
          ## padding to cells: top side bottom
          css.cell = 'padding: 0px 10px 0px;')
```

下表为无填充和侧面额外填充