r - xtable 周围的空白

Question

我正在尝试使用 knitr 在文本正文中插入一个小表格。我不确定这是 knitr/sweave 问题还是 xtable 问题，但我在 table 周围有很多空白。以下是表格设置为 5cm 的输出示例:



当我在 knitr 代码中调整表格的宽度时，图形标题会发生变化，但表格和空格保持不变。这是表格设置为 2 cm 的输出:



如何控制 xtable 周围的空白？这是我正在使用的代码:

\documentclass{article}
\usepackage{wrapfig}
\usepackage{float}

\begin{document}

TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT    TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT \par

<<test,echo=FALSE>>=
library(xtable)
## Make some data
School <- c("School A", "School B", "School C", "School D")
N <- c(59, 101, 69, 124)

df <- data.frame (School,N)

x <- xtable(df)
@

\begin{wraptable}[12]{l}[5pt]{5cm}
<<print,results='asis',echo=FALSE>>=
print (x, table.placement = getOption("xtable.table.placement", "H"))
@
\caption{Number of Responses}
\end{wraptable}

TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT TEXT


\end{document}

Answer 1

您正在放置一个 float table内wraptable ，这就像大鲨鱼吃小鲨鱼一样。如果您保留 tabular只是，事情有效。

print (x, table.placement = getOption("xtable.table.placement", "H"),
     floating=FALSE)

想想 wraptable作为 table 的替代品.