如何在Rstudio演示文稿中创建表格。

Question

我正在尝试在RStudio的.Rpres文件中创建一张表格。以下是我从网上搜索得到的内容，但对齐不正确。这是最好的方法吗？有关对齐的建议吗？

Test
=========================================================
| Right | Left | Default | Center |
|------:|:-----|---------|:------:|
|   12  |  12  |    12   |    12  |
|  123  |  123 |   123   |   123  |
|    1  |    1 |     1   |     1  |

  : Demonstration of simple table syntax.

Result:

- Glen

Answer 1

您可以使用knitr::kable来打印您的data.frame。

Test
========================================================

```{r, echo=FALSE}
my_df <- iris
knitr::kable(head(my_df))
```

@对齐方式: 我尝试使用 align = c('l', 'r', 'c', 'r', 'l')，如?kable所述 但它没有起作用。也许这是一个bug。

输出结果：

knitr::kable(head(iris), align = c('l', 'r', 'c', 'r', 'l'))

|Sepal.Length | Sepal.Width| Petal.Length | Petal.Width|Species |
|:------------|-----------:|:------------:|-----------:|:-------|
|5.1          |         3.5|     1.4      |         0.2|setosa  |
|4.9          |         3.0|     1.4      |         0.2|setosa  |
|4.7          |         3.2|     1.3      |         0.2|setosa  |
|4.6          |         3.1|     1.5      |         0.2|setosa  |
|5.0          |         3.6|     1.4      |         0.2|setosa  |
|5.4          |         3.9|     1.7      |         0.4|setosa  |

- Rentrop

Answer 2

一个pander的示例：

```{r}
df <- replicate(3, sample(letters, 3))
colnames(df) <- rep('foobar', 3)
pander::pander(df, justify = c('right', 'left', 'center'))
```

或者为所有列指定全局对齐方式（这也可以是一个智能函数）：

```{r}
set.alignment('right')
pander::pander(df)
```

两种方法都能生成正确格式的Markdown表格，在HTML中呈现效果很好。

- daroczig

Answer 3

我通过在函数调用中包含format = "html"参数，成功让align起作用，因此在上面FloOo讨论的示例中：

knitr::kable(head(iris), format = "html", align = c('l', 'r', 'c', 'r', 'l'))

给了我想要的结果。

- Valeri Voev