r - ggplot中图形顶部的x轴

Question

可能重复：
使用 ggplot2 更改单个图形的刻度线位置

如何使用 ggplot2/R 在绘图顶部获取 x 轴？

这个问题很相似，但是在 python 中。