ggplot2绘图中geom_text标签部分字符自定义配色实现咨询

可以通过ggtext包提供的富文本几何图层实现单标签内多色文本效果，该图层支持解析HTML样式标签，可对同一文本的不同片段单独设置格式。

完整实现代码 #

library(ggplot2)
library(ggtext)
set.seed(42)

dat <- subset(mtcars, wt > 2.75 & wt < 3.45)
dat$car <- rownames(dat)

# 构造带颜色样式的标签片段
dat$colored_text <- "<span style='color:green;'>/</span><span style='color:blue;'>A</span>"
dat$car2 <- paste0(dat$colored_text,'-',dat$car)

p <- ggplot(dat, aes(wt, mpg, label = car2)) +
  geom_point(color = "red")

# 使用geom_richtext替代geom_text，关闭默认的背景、边框样式
p1 <- p + geom_richtext(fill = NA, label.color = NA) + 
  labs(title = "geom_text多色效果")

p1

补充说明 #

• 如果你需要避免标签重叠，可使用ggtext配套的geom_richtext_repel()函数，参数设置逻辑和上述代码一致。
• 除颜色外，你还可以在<span>标签的style属性中添加字号、加粗、字体类型等CSS规则，实现更丰富的文本样式。

内容的提问来源于stack exchange，提问作者chippycentra