分類散點圖與平均段使用ggplot2在R

Question

我想繪製一個簡單的散點圖3組，覆蓋一段指示每個組的平均值和標記組。 我設法得到了帶有誤差線的散點圖，但我只想要一段指示平均值的段。我似乎也無法獲得集體標籤的權利。

要得到摘要統計數據，我使用了從this page的函數「summarySE」。

有沒有更簡單的方法來做到這一點，並得到一個段而不是一個點的意思？

我真的很感謝你的幫忙！調用summarySE和創建dfc前

dfc$tt <- factor(dfc$tt,labels=c("Group1", "Group2", "Group3")) 

當然：

library(ggplot2) 
library(plyr) 

df <- data.frame(tt = rep(1:3, each = 40), 
     val = round(rnorm(120, m = rep(c(4, 5, 7), each = 40)))) 

# After loading the summarySE function: 

dfc <- summarySE(df, measurevar="val", groupvars="tt") 


ggplot(dfc, aes(tt, val), main="Scatter plot with mean bars", 
     xlab="Groups", ylab="Values", names=c("Group1", "Group2", "Group3"))+ 
    geom_jitter(aes(tt, val), data = df, colour = I("red"), 
       position = position_jitter(width = 0.05)) + 
    geom_point(size = 3) + 
    geom_errorbar(aes(ymin=val-sd, ymax=val+sd), width = 0.01, size = 1) 

Answer 1

您可以使用geom_crossbar()並使用val爲y，ymin和ymax值。使用scale_x_continuous()您可以更改原始數據的x軸標籤或使用@agstudy解決方案更改原始數據，並且標籤將自動出現。

ggplot()+ 
    geom_jitter(aes(tt, val), data = df, colour = I("red"), 
       position = position_jitter(width = 0.05)) + 
    geom_crossbar(data=dfc,aes(x=tt,ymin=val, ymax=val,y=val,group=tt), width = 0.5)+ 
    scale_x_continuous(breaks=c(1,2,3),labels=c("Group1", "Group2", "Group3")) 

Answer 2

拿到小組標籤，您可以TT這樣的因素變化是連續的。

，並使用crossbar如下面的其他方案中提到，您可以：