获取第二个以列为单位的标题

Question

有时候，在学术著作中，人们想提出一个表格，其中每一列都有单位。通常在列名下方指定单位，例如

|Object       |Volume  |   area  | Price    | 
|             |$cm^3$  |$cm^2$   |   euros  |
|:------------|:-------|--------:|---------:|
|A            |3       |    43.36|    567.40|
|B            |15      |    43.47|   1000.80|
|C            |1       |    42.18|      8.81|
|D            |7       |    37.92|      4.72|

如何为我的bookdown文档实现这一目标？

谢谢。

Answer 1

这是使用kableExtra的一种方式：

```{r}
library(kableExtra)
df <- data.frame(Object = LETTERS[1:5], 
                 Volume = round(runif(5, 1, 20)),
                 area   = rnorm(5, 40, 3),
                 Price  = rnorm(5, 700, 200))

colNames <- names(df)
dfUnits <- c("", "$cm^3$",  "$cm^2$", "€")

kable(df, col.names = dfUnits,escape = F, align = "c") %>%
  add_header_above(header = colNames, line = F, align = "c")
```