减少用kable(，format = 'markdown')创建的表中列之间的间距

我尝试使用功能kable()的“markdown”格式创建一个表，但是列之间的间隔太宽，以至于该表在页面上延伸。无论如何，是否有必要调整单元格的大小，以使markdown格式的表格不会在页面上延伸？它以 latex 格式保留在页面中，但是我既不需要这种格式，也不需要html。我希望输出文件为.pdf。
我知道有人问过类似的问题here，但我的问题特定于格式减价。如果您觉得这是重复的，请合并问题。

可重现的示例:

---
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, 2),
                     Parameter7 = sample(1000000:9999999, 2))

names(table1) <- c('Factor1', 'Factor2', 'Parameter1', 'Parameter2', 'Parameter3', 'Parameter4', 'Parameter5', 'Parameter6', 'Parameter7')


kable(table1, format = 'markdown')
kable(table1, format = 'latex')
```

减少用kable(，format = 'markdown')创建的表中列之间的间距-LMLPHP

最佳答案

?kable中的几个示例包含padding参数。喂它0L会使您更接近，但是事实证明此参数将采用负整数，因此

kable(table1, format = 'markdown', padding=-1L)

会产生更接近您想要的东西。

关于减少用kable(，format = 'markdown')创建的表中列之间的间距，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/44411575/