Ich habe den folgenden Code:

label_rev <- function(labels, multi_line = TRUE, sep = ": ") {
     label_both(rev(labels), multi_line = multi_line, sep = sep)
  }
require(ggplot2)
p <- ggplot(data = mtcars, aes(wt, mpg)) + geom_point()
p + facet_grid(vs + cyl ~ gear, labeller = label_rev)

Ich erhalte die folgende Abbildung:

Hier ist mein Dilemma: Ich möchte, dass der äußere Streifen von vs: 0 nur ein Panel mit den drei Facetten (Zyl .: 4, 6, 8) und der äußere Streifen von vs: 1 ein Panel mit den drei Facetten (Zyl .: 4, 6, 8) ist : 4, 6, 8).

Ist das mit ggplot2 möglich?

Nochmals vielen Dank im Voraus für jede Hilfe!