R 如何使用注释防止文本在ggplot中消失 p

通过禁用剪裁并更改边距，您可能可以获得所需内容：

p <- ggplot(mtcars, aes(x = wt, y = mpg)) + geom_point()

p + annotate("text", x = 5, y = 25,
             label = "Some looooooooooooooooooooooooooong text") +
  coord_cartesian(clip = 'off') +
  theme(plot.margin = unit(c(1,5,1,1), "lines"))

---

<代码> p <代码> p> p>添加到您上面提供的解决方案中，因为您的标签中的单词是由空格分隔的，所以您也可以考虑使用<代码> StruxBase<代码>函数。这可能会给您一些额外的空间，因为标签会进一步推向左侧

库（ggplot2）
图书馆（stringr）
例如，你能接受其他问题中的一些答案吗？你已经问了145个问题，可能接受了其中的20个问题添加到@rawr上-请确保你知道该怎么做。有关更多信息，请访问Stack Overflow。非常感谢。
lbl_txt <- "Some looooooooooooooooooooooooooong text"
p <- ggplot(mtcars, aes(x = wt, y = mpg)) + geom_point()
p + annotate("text", x = 5, y = 25,
             label = lbl_txt) +
  coord_cartesian(clip = 'off') +
  theme(plot.margin = unit(c(1,(nchar(lbl_txt)-5)*2,1,1), "points"))