在kableExtra中将组用作表头

我最近发现了

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        |   |
|      |        |        |            |            |           |           |   |

不重复表格标题，但具有合并单元格的奖励点数

有人能给我指一些例子或相关文档吗

---

我使用的是

R4.0.2

，因此只能访问

kableExtra

，而不能访问

kable

使用转置函数

t（）

？我不知道这个函数，@holzben，你能详细说明一下吗？这是正常的矩阵转置函数，我认为先将数据转置，然后使用

kableExtra

，这可能会有所帮助，另请参见

add_header\u over

，了解标题跨越多个列的情况。