如何用ggrepel的geom_text_repel实现多行标签左对齐？

我完全懂你想要的效果——让多行标签里的每一行都严格左对齐，特别是让第二行的"very"刚好落在第一行"this"的正下方。虽然你已经设置了hjust = 0，但geom_text_repel的默认布局逻辑可能还是会让行之间出现偏移，下面给你两个精准解决的方案：

方案1：启用ggrepel的align参数 #

这是最直接的方法，geom_text_repel自带的align参数就是专门用来处理多行文本对齐的，配合你已经设置的hjust = 0就能实现完美左对齐：

library(tidyverse)
library(ggrepel)

mtcars %>% 
  ggplot(aes(hp, drat, label = "this label is so long \n very long \n very long")) + 
  geom_line() + 
  geom_text_repel(
    data = mtcars %>% filter(hp == max(hp)),
    nudge_x = 0.4,
    segment.color = 'transparent',
    size = 3,
    force = 0.2,
    hjust = 0,
    align = TRUE,  # 关键：开启多行文本对齐
    lineheight = 1.2  # 可选：调整行间距让对齐效果更清晰
  )

当align = TRUE时，ggrepel会强制所有文本行都按照hjust的设置对齐，这样第二行的"very"就会精准对齐第一行的"this"，完全在正下方。

方案2：手动格式化固定宽度的标签 #

如果align参数的效果还达不到你的预期，你可以手动把每一行文本调整到相同宽度，确保左对齐的一致性：

library(tidyverse)
library(ggrepel)

# 构造对齐后的标签：用str_pad让每一行宽度一致
aligned_label <- str_c(
  str_pad("this label is so long", width = 20, side = "right"),
  str_pad("very long", width = 20, side = "right"),
  str_pad("very long", width = 20, side = "right"),
  sep = "\n"
)

mtcars %>% 
  ggplot(aes(hp, drat, label = aligned_label)) + 
  geom_line() + 
  geom_text_repel(
    data = mtcars %>% filter(hp == max(hp)),
    nudge_x = 0.4,
    segment.color = 'transparent',
    size = 3,
    force = 0.2,
    hjust = 0
  )

通过str_pad把每一行文本填充到相同宽度，不管ggrepel的布局逻辑怎么调整，文本行都会保持严格的左对齐。

另外补充一下：你提到的grid::grid.gedit其实不太适合用来调整ggrepel的文本，因为ggrepel的文本元素是动态生成的，很难通过grid工具直接定位修改。而上面的两个方案都是基于ggrepel本身的功能，更可靠也更符合你的需求。

内容的提问来源于stack exchange，提问作者John-Henry