当我使用ggplot和geom_crossbar（）水平放置时，一切看起来都像我想要的那样。当我使用ggplotly Package 图时，参考线变得毫无意义并且方向错误。请参阅下面的代码和快照：
数据设置：

df <- data.frame(
    trt = factor(c(1, 1, 2, 2)),
    resp = c(1, 5, 3, 4),
    group = factor(c(1, 2, 1, 2)),
    upper = c(1.1, 5.3, 3.3, 4.2),
    lower = c(0.8, 4.6, 2.4, 3.6)
)

p <- ggplot(df, aes(resp, trt, colour = group)) + 
     geom_crossbar(aes(y=trt,xmin = lower, xmax = upper), width = 0.2)

字符串

的数据

ggplotly(p)

型

的
这是ggplotly的一个bug，还是有我不知道的解决方法？我喜欢保持交叉条水平，因为它看起来更适合我的实际数据。