7

我尝试使用函数kable()的“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, 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')
```

在此处输入图像描述

4

2 回答 2

5

中的几个示例?kable包含一个填充参数。喂它0L会让你更接近，但事实证明这个参数将采用负整数，所以

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

将产生更接近您正在寻找的东西。

于 2017-06-07T12:00:28.790 回答
2

我认为您正在寻找的实际上是kable(table, "latex", booktabs = T). 此外，您可以查看kableExtra可以轻松修改 kable 输出的软件包。

于 2017-06-12T02:21:01.340 回答