Как переключить правую полосу на левую сторону в facet_grid

Question

У меня есть следующий код:

library(tidyverse)
p <- ggplot(mpg, aes(displ, cty)) + geom_point()
p + facet_grid(drv ~ .)

, который производит этот график:

Как я могу описать выше, как я могу переключите правую полосу влево и наоборот.

Answer 1

Вы можете использовать switch в facet_grid, чтобы изменить полосу фасета влево, и scale_y_continuous, чтобы изменить ось Y вправо.

library(ggplot2)

p + facet_grid(drv ~ ., switch = "y") + 
   scale_y_continuous(position = "right")