在 kableExtra 中使用组作为表头

Question

我最近发现了kableExtra 。 在 R 中制作表格而不是在 Word 表格中手动输入值要快得多，而且不容易出错。

我想制作具有（或多个）分组变量作为标题的表格。 基本上，而不是这个

iris %>%
  group_by(Species) %>%
  summarise(mean = mean(Sepal.Length), sd = sd(Sepal.Length)) %>%
  kbl(digits = 1,format = "pipe")

|Species    | mean|  sd|
|:----------|----:|---:|
|setosa     |  5.0| 0.4|
|versicolor |  5.9| 0.5|
|virginica  |  6.6| 0.6|

相反，我想完成这个，或者这个的变体。

|      | Setosa | Versicolor | Virginica |   |
|------|--------|------------|-----------|---|
| mean | 5.0    | 5.9        | 6.6       |   |
| sd   | 0.4    | 0.5        | 0.5       |   |
|      |        |            |           |   |

对于多个标题，我在想这方面的事情

iris %>%
  mutate(long = ifelse(Sepal.Length > 5,TRUE,FALSE)) %>%
  group_by(Species,long) %>%
  summarise(mean = mean(Sepal.Length), sd = sd(Sepal.Length)) %>%
  kbl(digits = 1)

|Species    |long  | mean|  sd|
|:----------|:-----|----:|---:|
|setosa     |FALSE |  4.8| 0.2|
|setosa     |TRUE  |  5.3| 0.2|
|versicolor |FALSE |  5.0| 0.1|
|versicolor |TRUE  |  6.0| 0.5|
|virginica  |FALSE |  4.9|  NA|
|virginica  |TRUE  |  6.6| 0.6|

而是生产

|      | Setosa | Setosa | Versicolor | Versicolor | Virginica | Virginica |   |
|------|--------|--------|------------|------------|-----------|-----------|---|
| long | TRUE   | FALSE  | TRUE       | FALSE      | TRUE      | FALSE     |   |
| mean | 5.3    | 4.8    | 6.0        | 5.0        | 6.6       | 4.9       |   |
| sd   | 0.2    | 0.2    | 0.5        | 0.1        | 0.6       | NA        |   |
|      |        |        |            |            |           |           |   |

不重复表格标题但具有合并单元格的奖励积分。

有人可以指出任何示例或相关文档吗？

我使用的是R 4.0.2 ，因此只能访问kableExtra而不是kable 。