我希望在我的X和/或Y轴刻度标签上添加类似于10^的内容。
我知道可以在facet_grid
中使用像label_bquote
这样的标签器来完成此操作,但我很好奇是否有一种方法可以对刻度标签进行此操作。
p <- ggplot(mpg, aes(displ, cty)) + geom_point()
p + facet_grid(rows = vars(drv),labeller = label_bquote(rows=sigma==10^.(drv)))
这个示例代码将10^添加到每个分面行的标签中,并且目前如果我想要将10^添加到每个X轴刻度上,我会这样做:
p +
scale_x_continuous(labels = expression("10"^"2", "10"^"3", "10"^"4", "10"^"5", "10"^"6", "10"^"7"),
breaks = c(2, 3, 4, 5, 6, 7))
我的问题是:
是否有内置函数可以允许我在每个断点处添加表达式? 我目前的方法容易出现人为错误。
?annotation_logticks
中的示例。 - G. Grothendieck