如何在R的ggplot2中繪制組均值？

Question

我有以下數據（日期）

V  W  X  Y  Z
1  2  3  4  5
2  2  3  4  5
3  2  3  4  5
4  2  3  4  5

我想畫一條線與組均值的平均值例如。 在上述數據集中，所有組的總體平均值為3.3。 因此，連同組均值圖一起，我需要一條具有組均值均值的線。

簡單組均值的代碼如下：

dat1 <- gather(dat)#long format
ggplot(data = dat1, aes(x = key, y = value)) + 
  stat_summary(fun.data = "mean_cl_normal", colour = "red", size  = 1)

關於如何實現此目標的任何想法，而無需在外部計算組均值和CI，然后在ggplot2中調用該值？

Answer 1

也許這有幫助

library(tidyr)
library(dplyr)
library(ggplot2)
dat %>% 
   mutate(all = mean(unlist(.)) + rnorm(n())) %>%
    gather() %>%
    ggplot(., aes(x=key, y=value)) +
          stat_summary(fun.data = "mean_cl_normal", colour = "red", size  = 1)