r - ggplot2-避开带有点的水平误差线

我正在尝试使用ggplot2绘制与geom_point结合的水平误差线。由于这对数据有很多重叠，使绘图难以阅读，所以我想对它们进行规避。请参见以下示例:

DF = structure(list(co2 = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L), .Label = "dynamic", class = "factor"), exp = structure(c(1L,
1L, 1L, 2L, 2L, 2L, 1L, 1L, 1L, 2L, 2L, 2L), .Label = c("co2-only",
"co2+clim"), class = "factor"), scen = structure(c(1L, 1L, 1L,
1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L), .Label = c("RCP4.5", "RCP8.5"
), class = "factor"), period = structure(c(3L, 2L, 1L, 3L, 2L,
1L, 3L, 2L, 1L, 3L, 2L, 1L), .Label = c("Far", "Mid", "Near"), class = "factor"),
    diff = c(17.2365731737695, 26.4441581724835, 28.3046571086343,
    10.9818121922444, 21.1489829889248, 23.2735969240078, 18.5394616803628,
    31.3448949866531, 40.5106852239608, 12.3873574664227, 26.3689618723312,
    35.496171693588), xmax = c(18.8124771827038, 28.9759447727868,
    31.0652093173619, 12.3199261323593, 23.475705388954, 25.8961613764267,
    20.2426673616039, 34.5926118964219, 46.2762097135733, 13.7655268458833,
    29.4663164862106, 41.2153266045579), xmin = c(15.6606691648352,
    23.9123715721803, 25.5441048999066, 9.64369825212946, 18.8222605888956,
    20.6510324715888, 16.8362559991217, 28.0971780768843, 34.7451607343482,
    11.0091880869622, 23.2716072584518, 29.7770167826181)), .Names = c("co2",
"exp", "scen", "period", "diff", "xmax", "xmin"), row.names = c(NA,
-12L), class = "data.frame")

ggplot(DF, aes(x=diff, y=period, colour=scen, fill=exp)) +
  geom_point(position=position_dodge(width=0.3), size=4) +
  geom_errorbarh(aes(xmin=xmin, xmax=xmax), position = position_dodge(0.3), height=0.1) +
  theme_bw(base_size=16)

它产生图像:



但会抛出两个警告消息:

Warning messages:
1: position_dodge requires non-overlapping x intervals
2: position_dodge requires non-overlapping x intervals

我想对点+误差线对添加一些躲避，以防止重叠。

我究竟做错了什么？

最佳答案

我不确定您的示例为何不起作用(可能是geom_errorbarh特有的东西)，但这也许可以帮助您:

ggplot(DF, aes(y=diff, x=period, colour=scen, fill=exp)) +
    geom_point(position=position_dodge(width=0.3), size=4) +
    geom_errorbar(aes(ymin=xmin, ymax=xmax), position = position_dodge(0.3)) +
    theme_bw(base_size=16) + coord_flip()

我只是将geom更改为垂直误差线，并使用了coord_flip。

关于r - ggplot2-避开带有点的水平误差线，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/43827332/