r - 以上标开头的 ggplot2 facet strip 文本

Question

这听起来可能是多余的，但我已经搜索过以解决此特定问题，但无济于事。我想用同位素符号标记小平面 strip :222Rn，其中“222”采用上标格式，并且“Rn”之前没有空格。下面是一个使用 mpg 数据集的简单示例:

require(ggplot2)
test <- transform(mpg, drv = factor(drv, levels=c("4", "f", "r"),
        labels=c("Nitrate~as~NO[3]", "sum(x[i], i==1, n)", "x^222~Rn")))
ggplot(test, aes(displ, hwy)) +
geom_point() +
facet_wrap(~drv, labeller=label_parsed)

在前两个方面，可以实现大多数类型的字符/符号变化(甚至有些复杂的)，但在第三个看似简单的情况下 - 如果帽子(“^”)前面没有字符且后面没有通过空格指示符“~”...脚本每次都失败。

Answer 1

试试这个:

test <- transform(mpg, drv = factor(drv, levels=c("4", "f", "r"),
                                    labels=c("Nitrate~as~NO[3]", 
                                             "sum(x[i], i==1, n)", 
                                             "phantom(x)^222*Rn")))

我通常通过仔细研究 ?plotmath 中的信息然后进行大量试验和错误来解决这些问题。