R DT在DT中显示更多行

当我运行下面的代码时，我只得到1或2行数据。如何增加显示的行数？谢谢大家!

    ---
    title: " File Analysis"
    output:
    html_document: default
    pdf_document: default
    word_document: default
    ---

    ```{r setup, include=FALSE}
    knitr::opts_chunk$set(echo = FALSE,comment = NA, echo=FALSE,message= FALSE, warning = FALSE)
    ```
    **As can be seen in Table 1 below**
    ```{r echo=FALSE, message=FALSE,warning = FALSE}
    cwater<-matrix(rbinom(10*100, 1, .5), ncol=10)

    library("knitr","xtable", quietly = TRUE)
    library(DT, quietly = TRUE)
    datatable(cwater, caption = 'Table 1: This is a searchable table of the     water content.',
    class = 'cell-border stripe', filter = 'top',extensions   = 'Buttons',fillContainer=TRUE, options = list(
    pageLength = 10, autoWidth = TRUE,dom = 'Bfrtip',buttons = c  ('copy', 'print'), scrollX = TRUE, 
 selection="multiple"
    ))
    ```

---
标题：“文件分析”
输出：
html_文档：默认值
pdf_文档：默认值
word\u文档：默认值
---
```{r设置，include=FALSE}
knitr:：opts_chunk$set（echo=FALSE，comment=NA，echo=FALSE，message=FALSE，warning=FALSE）
```
**如下表1所示**
```{r echo=FALSE，message=FALSE，warning=FALSE}
cwater您需要增加容器的大小或关闭“fillContainer”选项：

---
title: "DT Table Example"
output: 
  html_notebook:
    toc: true
    number_sections: false
    theme: united
    highlight: tango
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE,comment = NA, echo=FALSE,message= FALSE, warning = FALSE)
```
**Turn off the 'fillContainer' option**
```{r echo=FALSE, message=FALSE,warning = FALSE}
cwater<-matrix(rbinom(10*100, 1, .5), ncol=10)

library("knitr","xtable", quietly = TRUE)
library(DT, quietly = TRUE)
datatable(cwater,
          caption = 'Table 1: This is a searchable table of the water content.',
          class = 'cell-border stripe', 
          filter = 'top',
          extensions = 'Buttons',
          fillContainer = FALSE, 
          options = list(pageLength = 10, 
                         autoWidth = TRUE,
                         dom = 'Bfrtip',
                         buttons = c('copy', 
                                     'print'), 
                         scrollX = TRUE, 
            selection="multiple"
          ))
```

---
标题：“DT表格示例”
输出：
html_笔记本：
toc：没错
分区数：false
主题：联合国
推荐理由：探戈
---
```{r设置，include=FALSE}
knitr:：opts_chunk$set（echo=FALSE，comment=NA，echo=FALSE，message=FALSE，warning=FALSE）
```
**关闭“fillContainer”选项**
```{r echo=FALSE，message=FALSE，warning=FALSE}
水