标记仪使用ggplot2删除了科学符号

Question

我想使用facet_grid中的label_parsed来更改标签，但它正在删除科学计数法。

这是一个简单的可复制示例：

library(ggplot2)
mtcars$cyl2 <- factor(mtcars$cyl, 
    labels = c('atop(atop(a),1.123e-2)','atop(atop(b),1e-3)','atop(atop(c),2.91e-4)'))
ggplot(mtcars, aes(wt, mpg)) + geom_point() + facet_grid(. ~ cyl2, labeller=label_parsed)

尽管options("scipen"=-999, "digits"=4)保留了本示例的科学表示法，但在更复杂的情节中却无法使用。

Answer 1

您是否只想这样做（在绘图表达式中使用字符而不是数字参数：

mtcars$cyl2 <- factor(mtcars$cyl, 
    labels = c('atop(atop(a),"1.123e-2")','atop(atop(b),"1e-3")',
                'atop(atop(c),"2.91e-4")'))