R：在ggplot2中的facet面板下放置x刻度

Question

在ggplot2包中的刻面图中，可以通过scale_x_continuous(position="top")等函数更改刻度线的位置。但是，如果要将刻度线放在顶部，它们会出现在刻面板上方，如下所示：

library(ggplot2)
ggplot(mpg, aes(displ, cty)) + geom_point() + 
facet_grid(. ~ cyl) +coord_flip() +
scale_y_continuous(position="right")

是否可以在方面的表示下放置单独的刻度线？

Answer 1

如何将小平面面板推到底部？

library(ggplot2)
ggplot(mpg, aes(displ, cty)) + geom_point() + 
    facet_grid(. ~ cyl, switch='x') +coord_flip() +
    scale_y_continuous(position="right")