我正在尝试使用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)
Run Code Online (Sandbox Code Playgroud)
有了这个,我得到一个漂亮的图,但是组重叠了。 在此处输入图片说明
我想抵消他们。我尝试了以下方法:
geom_pointrange(aes(x=RX, y=val, ymin=(val-SD), ymax=(val + SD),
group=group, color=group, position_dodge(width=1)), size=1.5)
Run Code Online (Sandbox Code Playgroud)
要么
geom_pointrange(aes(x=RX, y=val, ymin=(val-SD), ymax=(val + SD),
group=group, color=group, position="dodge"), size=1.5)
Run Code Online (Sandbox Code Playgroud)
和以上的变化。谁能暗示我在做什么错?谢谢