如何消除ggplot2::geom_smooth与{ggrepel}联用的label美学丢弃警告

警告出现的核心原因是：全局美学映射中包含了label参数，但geom_smooth()并不需要这个美学，它在统计转换时会自动丢弃label，从而触发警告。以下是两种简洁有效的解决方法：

方法1：仅在需要的图层中指定label美学 #

将label从全局aes()中移除，只在依赖它的geom_text_repel()中单独定义：

library(ggplot2)
library(ggrepel)
anscombe |>
    ggplot(
        aes(
            x = x3,
            y = y3
        )
    ) +
    geom_point() +
    geom_smooth(
        formula = y ~ x,
        se = FALSE,
        method = "lm"
    ) +
    geom_text_repel(aes(label = rownames(anscombe)))

方法2：让geom_smooth()不继承全局美学 #

在geom_smooth()中设置inherit.aes = FALSE，并手动指定它需要的x和y美学：

library(ggplot2)
library(ggrepel)
anscombe |>
    ggplot(
        aes(
            x = x3,
            y = y3,
            label = rownames(anscombe)
        )
    ) +
    geom_point() +
    geom_smooth(
        aes(x = x3, y = y3),
        formula = y ~ x,
        se = FALSE,
        method = "lm",
        inherit.aes = FALSE
    ) +
    geom_text_repel()

两种方法都能彻底消除警告，推荐使用方法1，它更符合ggplot2的图层设计逻辑，避免不必要的美学继承。

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