R 将文本添加到分组数据ggplo2的切面_网格中的不同水平平均线

R 将文本添加到分组数据ggplo2的切面_网格中的不同水平平均线,r,ggplot2,R,Ggplot2,我曾经将不同的水平平均线添加到facet\u grid显示的图中 它工作得很好,但我想知道是否有可能在不同的行旁边添加一些单独的文本 我的问题是:有可能在代码中包含这样的内容吗?你会怎么做 geom_text(aes(.7,mean(variable),label = round(mean(variable),digits = 2), vjust = -1)) 通过对@MrFlick解决方案进行一些调整,可以实现如下目的: 我调整了MrFlick的函数,将y替换为mean(y),从而确保标签放

我曾经将不同的水平平均线添加到
facet\u grid
显示的图中

它工作得很好,但我想知道是否有可能在不同的行旁边添加一些单独的文本

我的问题是:有可能在代码中包含这样的内容吗?你会怎么做

geom_text(aes(.7,mean(variable),label = round(mean(variable),digits = 2), vjust = -1))

通过对@MrFlick解决方案进行一些调整,可以实现如下目的:

  • 我调整了MrFlick的函数,将
    y
    替换为
    mean(y)
    ,从而确保标签放在平均线的y位置,而不是只计算
    yintercept

  • 调整后的函数只返回一行,而不是返回整个数据集,因此我将
    x
    设置为
    mean(x)
    。这确保了我们只得到一个标签

  • 通过这些调整,您可以通过以下方式向平均线添加标签:

    geom_text(aes(x = 10, label = round(..yintercept.., digits = 2)), stat = "mean_line", vjust = -1, hjust = 0)
    
    试试这个:

    库(ggplot2)
    
    StatMeanLine通过对@MrFlick的解决方案进行一些调整,可以这样实现:

  • 我调整了MrFlick的函数,将
    y
    替换为
    mean(y)
    ,从而确保标签放在平均线的y位置,而不是只计算
    yintercept

  • 调整后的函数只返回一行,而不是返回整个数据集,因此我将
    x
    设置为
    mean(x)
    。这确保了我们只得到一个标签

  • 通过这些调整,您可以通过以下方式向平均线添加标签:

    geom_text(aes(x = 10, label = round(..yintercept.., digits = 2)), stat = "mean_line", vjust = -1, hjust = 0)
    
    试试这个:

    库(ggplot2)
    StatMeanLine