我尝试使用功能kable（）的 “ markdown”格式创建表，但是列之间的间隔太宽，以至于该表在页面上延伸。无论如何，是否有必要调整单元格的大小，以使Markdown格式的表格不会在页面上延伸？它以乳胶格式保留在页面中，但是我既不需要这种格式，也不需要html。我希望输出文件为.pdf。我知道在这里也曾提出过类似的问题，但我的问题仅针对格式降价。如果您觉得这是重复的，请合并问题。
可重现的示例：
---
title: "Example"
author: "JAQuent"
date: "7 Juni 2017"
output: pdf_document
---
\tiny
```{r results='asis', echo = FALSE, warning = FALSE}
library(knitr)
table1 <- data.frame(Factor1 = c('level 1', 'level 1', 'level 2', 'level 2'),
Factor2 = c('level 1', 'level 2', 'level 1', 'level 2'),
Parameter1 = sample(1000000:9999999, 2),
Parameter2 = sample(1000000:9999999, 2),
Parameter3 = sample(1000000:9999999, 2),
Parameter4 = sample(1000000:9999999, 2),
Parameter5 = sample(1000000:9999999, 2),
Parameter6 = sample(1000000:9999999, …