將整個文本放入 plot 區域

Question

我想用文本創建一個 plot 但似乎 ggplot 在識別 x 和 y 限制時忽略了文本（它只使用中心點）。 因此，如果文本太長，則無法完全顯示。

df <- tibble(x = 1:5, y = 1:5)
ggplot(df, aes(x, y, label = paste(rep("long text", 3), collapse = " "))) +
  geom_point() + geom_text(nudge_y = 0.2)

在這種情況下，可以添加層expand_limits(x = c(0.4, 5.6))但這不適用於任何其他情況。 我想要一些適用於 x 和 y 的任何值以及任何文本長度的東西。

Answer 1

您可以為此使用ggrepel ：

library(ggrepel)

ggplot(df, aes(x, y, label = paste(rep("long text", 3), collapse = " "))) +
  geom_point() + ggrepel::geom_text_repel(nudge_y = 0.2, segment.alpha = 0)