如何上标和下标通常在“”内的参数：ggplot2和gt表

Question

我正在尝试使用library(gt)制作一张桌子。 我如何使列 label 包含上标或下标？ 我试过使用expression和方括号 [] 或 _ 等，但它没有达到预期效果 output。我想要一个列名称“[H2O] (mg/mL)”。 其中 2 是下标或上标。

data_table <- iris %>% 
  group_by(Species) %>% 
  summarise(Mean = mean(Petal.Width), SD = sd(Petal.Width), n = n())  %>% 
  ungroup() %>% 
  gt()

data_table %>% cols_label(
    Mean = expression('[H'[2]'O] (mg/ml)')
  )

同样，在使用 ggplot 时，尝试使用以下方法制作图例时：

labs(colour = "[H2O] (mg/ml)")

我希望 2 成为下标。 我也在这里尝试过 bquote 和 expression，但由于颜色分配而不起作用。

Answer 1

使用gt::html和<sub>标签（或<sup>用于上标）你可以这样做：

library(dplyr)
library(gt)

data_table <- iris %>% 
  group_by(Species) %>% 
  summarise(Mean = mean(Petal.Width), SD = sd(Petal.Width), n = n())  %>% 
  ungroup() %>% 
  gt()

data_table %>% 
  cols_label(
    Mean = html('H<sub>2</sub>O (mg/ml)')
  )

有关详细信息，请参阅 gt Intro vi.nette 中的示例。