使用scale_x_reverse时，geom_errorbar消失

Question

我正在尝试生成一个简单的散点图，但是x尺度反转（因为这将是一种更好的方式来显示y随着x的增加而下降。图表在两个轴上升的情况下工作正常......

envsum$chemo.index <- c(0.56254404 2.73595615 2.47705543 0.01796475)

envsum$sp_shared <- c(66.6 100.0  83.9  62.8)

gShareSP  <- ggplot(envsum, aes(chemo.index, sp_shared))

gShareSP  <- gShareSP + geom_point()

gShareSP  <- gShareSP +  geom_errorbarh(xmax=ch.ind+seCh, xmin=ch.ind-seCh)

gShareSP  <- gShareSP + geom_smooth(method="lm", se=F, colour="black")

gShareSP  <- gShareSP + theme_bw()

gShareSP

但是当我添加行

gShareSP  <- gShareSP + scale_x_reverse()

errorbars消失（除了移动到图上随机点的那个）

我不认为scale_x_reverse应该改变错误栏的位置，我找不到修复来阻止它发生