ggplot图例标题：上标弄乱格式化

Question

如你所见（见下图），我的传奇标题中的上标一直向右移动（可能是由于第一行中的长词）。首先我假设改变标题的行高会有所帮助，但事实并非如此。此外，我希望有换行符以节省空间。

您有任何想法如何解决这个问题吗？

library("ggplot2")
x <- seq(1,10,1)
y <- sin(x)
z <- c("1", "1", "2", "2", "2", "1", "2", "3", "3", "3")

df <- data.frame(x,y,z)

p <- ggplot(df, aes(x,y, color=z))
p + geom_point() +
  labs(
    color = expression(
      paste(
        "Catalyst Loading \n(mg cm"^{-2}*")"
        )
      )
    )

Answer 1

这是\n混淆了你的传奇头衔。要使用换行符和表达式，我建议atop解决方案：

library(ggplot2)
nameColor <- bquote(atop(Catalyst~Loading~phantom(),
                         (mg~cm^-2)))
ggplot(df, aes(x, y, color = z)) + 
    geom_point() +
    labs(color = nameColor)