如何让ggplot图表标题显示在y轴标签上方？

当使用coord_flip()翻转坐标轴后，若y轴（原x轴）标签较长，图表标题会默认靠右偏移，要让标题显示在y轴标签上方的左上角，可通过以下两种方法实现：

方法一：使用plot.title.position（推荐，ggplot2 3.3.0+） #

该参数可让标题相对于整个绘图区域对齐，而非默认的轴面板区域，直接解决标题偏移问题：

library(tidyverse)

mtcars |> 
    rownames_to_column('model') |> 
    ggplot(aes(x=model, y = mpg)) +
    geom_col() +
    coord_flip() +
    labs(title = '如何让标题显示在车型标签上方的左上角？') +
    theme(plot.title.position = "plot")  # 关键配置

方法二：调整标题对齐与边距（兼容旧版本） #

若你的ggplot2版本较低，可通过设置标题左对齐并调整绘图边距实现：

library(tidyverse)

mtcars |> 
    rownames_to_column('model') |> 
    ggplot(aes(x=model, y = mpg)) +
    geom_col() +
    coord_flip() +
    labs(title = '如何让标题显示在车型标签上方的左上角？') +
    theme(plot.title = element_text(hjust = 0),  # 标题左对齐
          plot.margin = margin(t = 10, r = 10, b = 10, l = 10))  # 调整边距避免标题被截断

内容的提问来源于stack exchange，提问作者Joe