我有以下数据(dat)
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中调用值?
答案 0 :(得分:2)
也许这有帮助
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)