geom_label

Question

我想从数据框字符串中绘制geom_label中的上标星，但无法找到解决方案。

最小的工作示例是

library(ggplot2)
df <- data.frame(x = 1, y = 1, l = "P^2")
# the real data.frame has more observations with other expressions as well

ggplot(df, aes(x = x, y = y, label = l)) + 
  geom_label(parse = T)

但我没有P ^ 2而是想要显示P ^ *。但是，在这种情况下，"P*"，"P^*"，latex2exp::TeX("P^\\star", output = "character")或任何其他\都无法帮助我。

修改

如果您正在寻找在geom_label，text（annotate）或使用data.frame中的文本的其他几何中使用表达式（和星号）（即，您在aes中分配值功能），那么这可能对你有所帮助。

如果要在轴标签，标题或其他直接在aes - 函数之外分配的文本（即labs(x = "my expresion here")）中使用表达式（和星号），然后this question会帮助你！

Answer 1

在写完问题之后，我终于找到答案只是"P^'*'"。但是因为我无法在其他任何地方找到解决方案，所以我想在这里留下答案。

df <- data.frame(x = 1, y = 1, l = "P^'*'")

ggplot(df, aes(x = x, y = y, label = l)) + 
  geom_label(parse = T)