r - ggplot 躲避条形图

Question

我正在拼命寻找这个问题的解决方案:

我想从以下数据帧创建一个条形图:

means <- c(2.4,3,3,3.16,2.5,2.5,3,4.5)
sds <- c(1.0,1.2,1.0,1.1,2.1,0.7,2.8,0.7)
teams <- c(1,1,1,1,2,2,2,2)
scales <- c(1,2,3,4,1,2,3,4)

datas <- data.frame(teams, scales, means, sds)

以前，它运行良好，我得到了一张图片，其中蓝色和红色并排并带有标准偏差。

graph <- ggplot(data=datas,  aes(scales, y=means))
graph + 
  geom_bar(aes(fill=teams), stat="identity", position="dodge") + 
  no_margins + 
  geom_errorbar(aes(ymin= means - sds, ymax = means + sds, width=0.2), position=position_dodge(width=0.90)) + 
  coord_flip() 

安装最新版本的 R (2.15.1) 后，我得到的只是一个文件，其中 4 个条形显示为蓝色且没有躲避(并排)

有没有人知道变化(颜色，闪避)来自哪里？

我花了几个小时来寻找结果，所以非常感谢您的任何建议!

Answer 1

我不确定为什么它不能正常工作，但这里有一个可以正常工作的版本。

graph <- 
    ggplot(data=datas,  aes(scales, y=means, group=teams)) + 
    geom_bar(aes(fill=teams), stat="identity", 
             position="dodge") + 
    geom_errorbar(aes(ymin= means - sds, ymax = means + sds, width=0.2), 
                  position=position_dodge(width=0.90)) +
    coord_flip()

我把 group=teams进入美学；应该没有必要，因为您有 fill=teams在 geom_bar .