如题，建立一个 RMD 文档，写点代码，knit 生成 html 文档后，发现把 DT 包子画的表格放到 div 框里会出现两个问题：
可复现的代码如下：
```{css}
.table {
font-size: 12px;
line-height: 90%;
}
.title {
font-size: 14px;
font-weight: bold;
}
```
```{r}
library(DT)
data<-data.frame(
type = rep(c('NO', 'YES'), 20),
value = sample(2000:5000, 40)
)
tbl <- datatable(data,
options = list(dom = 'tip'))
htmltools::div(
class = "table",
htmltools::div(class = "title",
"主标题：这是表格的副标题",
htmltools::h6("副标题：这是表格的副标题")),
tbl,
htmltools::div(class = "title", "脚注：这是表格的脚注")
)
```
