R 在ggplot2中的两个网格中，使用两条线的数学表达式和刻面网格进行标记

我想为两个网格添加带有数学表达式的标签，两行为

facet\u grid

（参见MWE）。我可以在一行中得到它，我想在两行中得到它（β在一行中，伽马在第二个图形的第二行中）

您可以使用

top（）

而不是

list（）

：

---

top（）

是一种蛮力方法，因为它将“x置于y之上（无水平条）”

感谢@PoGibas提供了有用的答案。想知道如何在beta:（vs）中放置=符号而不是：符号。再次感谢。@MYaseen208使用

=

：-）非常感谢@PoGibas。非常感谢。

library(ggplot2)

p1 <- ggplot(mtcars, aes(x = mpg, y = wt)) + geom_point()

p1 + facet_grid(
    facets = gear ~ vs + am
  , labeller = label_both
  )

p1 + facet_grid(
     facets = gear ~ vs + am
    , labeller = 
       label_bquote(
         rows = alpha:.(gear)
      , cols = list(beta:.(vs), gamma:.(am))
      )
    )

library(ggplot2)
ggplot(mtcars, aes(mpg, wt)) + 
    geom_point() +
    facet_grid(gear ~ vs + am, 
        labeller = label_bquote(
            rows = alpha:.(gear), 
            cols = atop(beta:.(vs), gamma:.(am))))