我正在尝试使用 ggplot、geom_poitrange 绘制图形。我有两组,每组有两个点和相应的错误值。我使用的代码如下:
group<-c("A","A","B","B")
val<-c(1.3,1.4, 1.2,1.5)
SD<-c(0.3,0.8,0.6,0.5)
RX<-c("X","Z","X","Z")
a<-data.frame(group,val,SD,RX)
ggplot(data=a)+
geom_pointrange(aes(x=RX, y=val, ymin=(val-SD), ymax=(val + SD),
group=group, color=group, position_dodge(width=4)), size=1.5)
有了这个,我得到了一个很好的图表,但组重叠。
enter image description here
我想抵消它们。我尝试了以下方法:
geom_pointrange(aes(x=RX, y=val, ymin=(val-SD), ymax=(val + SD),
group=group, color=group, position_dodge(width=1)), size=1.5)
或者
geom_pointrange(aes(x=RX, y=val, ymin=(val-SD), ymax=(val + SD),
group=group, color=group, position="dodge"), size=1.5)
和上述的变体。
谁能建议我做错了什么?
谢谢
最佳答案
OP 提供了两种可能的解决方案。第一个解决方案使用 position_dodge()
功能,这是接近的。问题是它在参数列表中的位置错误(不是因为宽度太大)。
明确指定 position = position_dodge(width = 1)
后 aes()
ggplot(data=a) +
geom_pointrange(aes(x=RX, y=val, ymin=(val-SD), max=(val + SD),
group=group, color=group),
position = position_dodge(width = 1), size=1.5)
在帮助中检查 API
?geom_pointrange()
,您会看到位置在映射、数据和统计之后。如上所示,这里最简单的事情是明确的。否则,您将收到如下错误或警告:Warning: Ignoring unknown aesthetics
或者
Error: `data` must be a data frame, or other object coercible by `fortify()`, not an S3 object with class PositionDodge/Position/ggproto/gg
为什么不
position="dodge"
?如果您尝试第二种解决方案,您将收到一条警告,告诉您尝试第一种解决方案:
Warning message:
Width not defined. Set with `position_dodge(width = ?)`
据我所知,躲避是为条形图和箱形图编写的,并使用
width
这些对象所固有的。线条没有宽度,因此您需要明确指定应该发生多少闪避。
关于r - 将 position_dodge 与 geom_pointrange 一起使用,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/43956574/