如何为ggplot2因子标签中的特殊字符添加文本下标？答案

【问题标题】：How to add a text subscript to a special character in ggplot2 factor label?如何为ggplot2因子标签中的特殊字符添加文本下标？
【发布时间】：2022-01-10 20:36:16
【问题描述】：

我需要首先重新标记因素，以便有字母符号后跟文本下标。我遵循了几个地方的几个例子并尝试了以下方法。

df <- data.frame(alpha = c("aii","aij","ajj","aji"), count = c(1,2,3,4))

ggplot(aes(x = alpha, y = count), data = df) + geom_points()+
    scale_x_discrete(labels=c("aii" = bquote(\u03b1 [ii]), "aij" = bquote(\u03b1 [ij]),
                              "ajj" = bquote(\u03b1 [jj]),"aji" = bquote(\u03b1 [ji]))

其中 \u03b1 是 alpha 的 unicode

我收到Error: unexpected input in: "aii" = bquote(\u03b1 [ii])

关于如何继续的任何建议。

【问题讨论】：

标签： r ggplot2 label axes

【解决方案1】：

bquote() 需要在 unicode 周围加上引号，而对 geom_point() 的调用拼写错误。

library(ggplot2)

df <- data.frame(alpha = c("aii","aij","ajj","aji"), count = c(1,2,3,4))

ggplot(aes(x = alpha, y = count), data = df) + 
  geom_point() +
  scale_x_discrete(labels=c("aii" = bquote("\u03b1" [ii]), "aij" = bquote("\u03b1" [ij]), 
                            "ajj" = bquote("\u03b1" [jj]),"aji" = bquote("\u03b1" [ji])))

【讨论】：