Stargazer 选项：调整大小框和标签

Question

是否可以将 resizebox 合并到 R 中的 stargazer 中？我正在尝试创建一张太宽而无法容纳的桌子，即使从横向角度来看也是如此。我手动将 resizebox{\textwidth}{!} { \begin{tabular} \end{tabular} } 添加到 .tex 文件中，我喜欢它的外观。但是，我希望我的 .Rnw 文件是完整的，这样我就可以完美地生成 pdf，而无需对 .tex 文件进行额外的更改。

在相关说明中，stargazer 会导致 pdflatex 输出多个警告，因为它在未指定标签时包含 \label{} 。这些不会影响 pdf 的创建，但当存在其他错误时会导致混乱。

同样，我可以从 .tex 文件中手动删除这些行，或分配标签名称。然而，我想简单地告诉 stargazer 不要包含这一行。

Answer 1

capture.output()这并不理想，但您可以使用和手动操作 stargazer 的 LaTeX 代码输出gsub()。

table <- capture.output({ # Store the stargazer output in a string
  stargazer(iris, header=F) # e.g.
})
table <- gsub("\\begin{tabular}","\\resizebox{0.9\\textwidth}{!}{\\begin{tabular}", table,fixed=T)
table <- gsub("\\end{tabular}","\\end{tabular}}", table,fixed=T)
cat(table)

如果您在多个地方需要该过程，也可以将该过程提取到一个方法中。

Answer 2

我发现的最好方法是使用将 stargazer 选项 float 设置为 FALSE，然后使用 cat() 手动将比例盒放入 float 环境中；例如：

<< results='asis', echo = FALSE>>=

cat("\\begin{table}[!htbp]")
cat("\\centering")
cat("\\caption{OLS Regression Results by Metal Level}")
cat("\\label{OLS}")
cat("\\scalebox{.8}{")

stargazer(models$model1OLS,
          float = FALSE)

cat("}") # for the end of the scalebox
cat("\\end{table}")

@

请注意，您还必须手动为表格添加标签、居中和标题。这几乎肯定可以使用 resizebox 而不是 scalebox 来工作，但我还没有尝试过。