Question

是否有某种方法可以在'geom_label_repel'alpha=1中获取字体，但背景可能是alpha=.2？

我的问题是，我有时非常密集的情节。如果我只使用文本，则文本不再可读。如果我使用没有透明度的标签，标签是完全可读的，但我看不到标签后面。如果我为标签选择透明度，那么再次，字体不再可读，因为它也是透明的，并且与背景的对比度不足。

我真正喜欢的是字体周围的白色阴影： - ）

这是一个最小的例子来证明问题。

library(ggplot2)
library(ggrepel)
library(stringi)

set.seed(1)
df <- data.frame(x=rnorm(10000),
                 y=rnorm(10000),
                 label=NA)
df$label[1:26] <- stringi::stri_rand_strings(26,8)

ggplot(df, aes(x, y)) +
  geom_point(alpha=.3) +
  geom_label_repel(aes(label=label),
                   label.size = NA, 
                   alpha = 0.6, 
                   label.padding=.1, 
                   na.rm=TRUE) +
  theme_bw()

Answer 1

绘制两个标签，第二个没有填充。设置种子以确保它们完全重叠。（使用geom_text_repel似乎不起作用，因为排斥的工作略有不同。）

ggplot(df, aes(x, y)) +
  geom_point(alpha=.3) +
  geom_label_repel(aes(label=label),
                   label.size = NA, 
                   alpha = 0.6, 
                   label.padding=.1, 
                   na.rm=TRUE,
                   seed = 1234) +
  geom_label_repel(aes(label=label),
                   label.size = NA, 
                   alpha = 1, 
                   label.padding=.1, 
                   na.rm=TRUE,
                   fill = NA,
                   seed = 1234) +
  theme_bw()

Answer 2

ggplot(df, aes(x, y)) +
  geom_point(alpha=.3) +
  geom_label_repel(aes(label=label),
                       label.size = NA,  
                       label.padding=.1, 
                       na.rm=TRUE,
                       fill = alpha(c("white"),0.5))

这对我有用。您可以使用颜色设置Alpha。由于填充设置仅是背景，因此文本不受影响。覆盖文本的优点是您仍然可以使用“排斥”来防止文本重叠，而不必担心使两层正确对齐

Answer 3

可能类似以下内容：

library(ggplot2)
library(ggrepel)
library(stringi)

set.seed(1)
df <- data.frame(x=rnorm(10000),
                 y=rnorm(10000),
                 label=NA)
df$label[1:26] <- stringi::stri_rand_strings(26,8)

ggplot(df, aes(x, y)) +
    geom_point(alpha=.3) +
    geom_label_repel(aes(label=label),
                     label.size = NA, 
                     alpha = 0.75, 
                     fontface = 'bold', color = 'black',
                     box.padding = 0.80, point.padding = 0.5,
                     na.rm=TRUE) +
    theme_bw()

给出：

ggrepel标签，透明背景，但可见字体

3 个答案: