如何在ggplot2中使用数学表达式创建多行x轴标题

Question

xlab(expression(paste("CO"^"2", " concentration", "\n Lolium perenne")))

这是我目前的编码。 使用我的xlab，我希望在一条线上有CO ^ 2浓度，然后＆＃34; Lolium perenne＆＃34;在它下面，但它也需要用斜体字。目前这个代码放置了＃34;浓度＆＃34;在上面的线上＆＃34; CO ^ 2＆＃34;和＆＃34; Lolium Perenne＆＃34;。 请帮忙！

Answer 1

让我们把它变成一个可重复的例子，然后用@Brian建议的方法回答。

以下不起作用。 x轴标题全部在一行：

library(ggplot2)
set.seed(124)
d <- data.frame(x = rnorm(50),
                y = rnorm(50))

ggplot(d, aes(x, y)) + geom_point() +
  xlab(expression(paste("CO"^"2", " concentration", "\n Lolium perenne")))

但是，使用atop()函数，我们可以获得此结果：

ggplot(d, aes(x, y)) + geom_point() +
  xlab(expression(atop(CO[2]*" concentration", italic("Lolium perenne"))))

我们使用italic()函数以斜体字排版“Lolium perenne”。我们还用下标写了二氧化碳，这可能就是这里需要的。