如何在ggplot2的文本中下标字母或数字[重复]

Question

我希望 y 轴标记为：甲状腺素血清水平 (T4)，下标为 T4 中的 4。在我的代码中，我尝试了 labs(y = expression(Serum Levels of Thyroxine ([T4]))。但是它不起作用。以前的问题只涉及要下标的字母，但是，当字母或否时出现问题。下标是在一些单词/文本之后。 我的数据框和代码如下

df <- data.frame(time = c("1 h","6 h","12 h","24 h","3 days"),
    values = c(1,2,3,4,5))
  df %>% 
      ggplot(aes(time,values))+
      geom_point()+
      labs(y = "Serum Thyroxine T4 levels", 
    x = "Exposure Period")

Answer 1

问题似乎是由于表达式中使用的空格造成的。解决这个问题的方法是将每个空格替换为~。

library(ggplot2)
library(magrittr)
df <- data.frame(time = c("1 h","6 h","12 h","24 h","3 days"),
                 values = c(1,2,3,4,5))
ggplot(df, aes(time,values)) +
  geom_point() + 
  labs(y = expression(Serum~Thyroxine~T[4]~levels~(ng/ml)), x = "Exposure Period")

编辑：将 T 移出 []