r - 避免在 ggplot2 中重叠 geom_point 和 geom_text

Question

如何避免 ggplot2 中的这两层重叠？我尝试显示文本，以便它们不会位于点之上。

check_overlap 在避免文本自身重叠方面做得很好，但不与其他图层重叠。

我还尝试了库 geom_text_repel，但该库不支持 check_overlap 并显示每个数据点的文本。

但我不需要像 check_overlap 那样为每个点提供文本。

ggplot(dat, aes(x = CPI, y = HDI)) +
  geom_point(aes(color = Region), shape=21, size=4, position = "identity") +
  geom_text(data = dat, aes(label = Country), size=4, check_overlap = TRUE)

Answer 1

geom_text_repel 不会为空字符串 "" 创建文本标签。但是，文本标签将排斥未标记的数据点。

试试这个:

# Hide text labels for the first 3 data points
idx <- c(1,2,3)

dat$CountryLabel      <- dat$Country
dat$CountryLabel[idx] <- ""

library(ggrepel)
ggplot(...) + geom_text_repel(data = dat, aes(label = CountryLabel))