Rmarkdown表在可以放入一页时被推到两页

我试图为不同的表创建单独的Rmd文件，其中每个表都被呈现为单独的PDF。由于一些复杂的格式问题，我正在使用xtable尝试实现这一点。我有一些表格，我预计将用1英寸的边距填满整个8.5x11.0页。但是当我呈现它们时，pdf的第一页是空白的，第二页有完整的、格式正确的表格。我正在寻求帮助，让它正常工作。这是我最简单可行的例子

---
output: pdf_document
tables: true
geometry: margin=1.0in
---

```{r results='asis', echo=FALSE, warning=FALSE, eval=TRUE}
require(xtable)

# set up data frame
df <- data.frame(Label=c(letters[1:26], letters[1:13]), Numbers=1:39)

strCaption <- "\\textbf{Supplementary Table 1. This table is just produced with some random data and does not mean anything.}"

# set up xtable output
print(xtable(df, caption = strCaption, label = ""),
      size = "normalsize",
      include.rownames = FALSE,
      include.colnames = TRUE,
      caption.placement = "top",
      comment=FALSE
      )
```

---

如果我更改边距大小，似乎只会影响左右边距。如果我缩小字体的大小，它将适合于一页，但我想保持字体大小一样，并摆脱空白的第一页。思想？我有点像乳胶新手，所以很抱歉遗漏了一些明显的东西。

我认为如果添加

floating=FALSE

参数，应该可以解决问题。我认为这是相当于

的
乳胶！h
定义表时，此处为参数。我还将
library
调用与其他代码分开（并使用
library
而不是
require
），但这是风格和挑剔的

---
output: pdf_document
tables: true
geometry: margin=1.0in
---

```{r echo=FALSE, warning=FALSE, eval=TRUE, results='hide'}
library(xtable)
```

```{r eval=TRUE, echo=FALSE, results='asis'}
# set up data frame
df <- data.frame(Label=c(letters[1:26], letters[1:13]), Numbers=1:39)

strCaption <- "\\textbf{Supplementary Table 1. This table is just produced with some random data and does not mean anything.}"

# set up xtable output
print(xtable(df, caption = strCaption, label = ""),
      include.rownames = FALSE,
      include.colnames = TRUE,
      caption.placement = "top",
      comment=FALSE,
      floating=FALSE
      )
```

---
输出：pdf\U文件
表：对
几何图形：边距=1.0英寸
---
```{r echo=FALSE，warning=FALSE，eval=TRUE，results='hide'}
图书馆（xtable）
```
```{r eval=TRUE，echo=FALSE，results='asis'}
#建立数据框架
df我认为如果添加
floating=FALSE
参数，应该可以解决问题。我认为这是相当于
的
乳胶！h
定义表时，此处为参数。我还将
library
调用与其他代码分开（并使用
library
而不是
require
），但这是风格和挑剔的

---
output: pdf_document
tables: true
geometry: margin=1.0in
---

```{r echo=FALSE, warning=FALSE, eval=TRUE, results='hide'}
library(xtable)
```

```{r eval=TRUE, echo=FALSE, results='asis'}
# set up data frame
df <- data.frame(Label=c(letters[1:26], letters[1:13]), Numbers=1:39)

strCaption <- "\\textbf{Supplementary Table 1. This table is just produced with some random data and does not mean anything.}"

# set up xtable output
print(xtable(df, caption = strCaption, label = ""),
      include.rownames = FALSE,
      include.colnames = TRUE,
      caption.placement = "top",
      comment=FALSE,
      floating=FALSE
      )
```

---
输出：pdf\U文件
表：对
几何图形：边距=1.0英寸
---
```{r echo=FALSE，warning=FALSE，eval=TRUE，results='hide'}
图书馆（xtable）
```
```{r eval=TRUE，echo=FALSE，results='asis'}
#建立数据框架
df多亏了来自的帖子，我才知道
table.placement
选项实现了我想要的功能，而无需关闭浮动

---
output: pdf_document
tables: true
geometry: margin=1.0in
---

```{r results='asis', echo=FALSE, warning=FALSE, eval=TRUE}
require(xtable)

# set up data frame
df <- data.frame(Label=c(letters[1:26], letters[1:13]), Numbers=1:39)

strCaption <- "\\textbf{Supplementary Table 1. This table is just produced with some random data and does not mean anything.}"

# set up xtable output
print(xtable(df, caption = strCaption, label = ""),
      size = "normalsize",
      include.rownames = FALSE,
      include.colnames = TRUE,
      caption.placement = "top",
      comment=FALSE,
      table.placement = "!ht"
      )
```

---
输出：pdf\U文件
表：对
几何图形：边距=1.0英寸
---
```{r results='asis'，echo=FALSE，warning=FALSE，eval=TRUE}
需要（xtable）
#建立数据框架
df多亏了来自的帖子，我才知道
table.placement
选项实现了我想要的功能，而无需关闭浮动

---
output: pdf_document
tables: true
geometry: margin=1.0in
---

```{r results='asis', echo=FALSE, warning=FALSE, eval=TRUE}
require(xtable)

# set up data frame
df <- data.frame(Label=c(letters[1:26], letters[1:13]), Numbers=1:39)

strCaption <- "\\textbf{Supplementary Table 1. This table is just produced with some random data and does not mean anything.}"

# set up xtable output
print(xtable(df, caption = strCaption, label = ""),
      size = "normalsize",
      include.rownames = FALSE,
      include.colnames = TRUE,
      caption.placement = "top",
      comment=FALSE,
      table.placement = "!ht"
      )
```

---
输出：pdf\U文件
表：对
几何图形：边距=1.0英寸
---
```{r results='asis'，echo=FALSE，warning=FALSE，eval=TRUE}
需要（xtable）
#建立数据框架
谢谢！这就去掉了最初的空白页，将所有内容放在一页上，但现在标题消失了。我可以在代码块前面加上标记，但是如果它能与标题选项一起使用，那就太好了。啊，现在我明白你所说的
！h
-xtable有一个table.placement选项，该选项接受codesThanks！这就去掉了最初的空白页，将所有内容放在一页上，但现在标题消失了。我可以在代码块前面加上标记，但是如果它能与标题选项一起使用，那就太好了。啊，现在我明白你所说的
！h
-xtable有一个table.placement选项，该选项接受代码您的解决方案肯定比我的更优雅。好东西。你的解决方案肯定比我的更优雅。好东西。