下列代码来自于“R语言可是化手册中”中，不过发现问题：为何2个系列的柱子和对应上个值位置不对（好像反了). 请高手看看如何解决？

数据集处理：

library(ggplot2) library(gcookbook) library(plyr) ce<-arrange(cabbage_exp,Date,Cultivar)

ce<-ddply(ce,"Date",transform,label_y=cumsum(Weight))> ce  Cultivar Date Weight        sd  n         se label_y1      c39  d16   3.18 0.9566144 10 0.30250803    3.182      c52  d16   2.26 0.4452215 10 0.14079141    5.443      c39  d20   2.80 0.2788867 10 0.08819171    2.804      c52  d20   3.11 0.7908505 10 0.25008887    5.915      c39  d21   2.74 0.9834181 10 0.31098410    2.746      c52  d21   1.47 0.2110819 10 0.06674995    4.21





绘图代码：ggplot(ce,aes(x=Date,y=Weight,fill=Cultivar))+geom_bar(stat="identity")+geom_text(aes(y=label_y,label=Weight),vjust=1.5,colour="white")