在ggplots中躲避geom_point以显示错误栏的估计值

Question

我使用以下代码来展示一些测量值,它们的估计值和它们的CI:

ssi.oe.cutoffs.chart <- ggplot(data=oe.chart.data, aes(x=core_ot_code_mod, colour=cutoff))
ssi.oe.cutoffs.chart <- ssi.oe.cutoffs.chart + geom_hline(yintercept=1)
ssi.oe.cutoffs.chart <- ssi.oe.cutoffs.chart + geom_errorbar(aes(ymin=lcl95, ymax=ucl95, width=0.5),position="dodge")
ssi.oe.cutoffs.chart <- ssi.oe.cutoffs.chart + geom_errorbar(aes(ymin=SIR, ymax=SIR, width=0.5),position="dodge")

core_ot_code_mod是一个离散变量,geom_errorbar它对我来说很完美,显示了2个具有不同颜色的躲避错误栏,但是我不能使用相似的代码让geom_point现在的方式相同.而我正在使用另一个geom_errorbar作为替代品,这不是很好.

这里的任何人都可以开导我吗？谢谢!

Answer 1

geom_point需要明确指定闪避的宽度.
这是一个最小的例子:

d <- data.frame(expand.grid(x=letters[1:2], co=letters[3:4]), y=runif(4))
d <- transform(d, Lo=y-1, Hi=y+1)

ggplot(d, aes(x, y, colour=co)) + 
  geom_point(position=position_dodge(width=0.3)) +
  geom_errorbar(aes(ymin=Lo, ymax=Hi), width=0.15, 
    position=position_dodge(width=0.3))

width = 0.15指定错误栏的宽度.
width = 0.3 inside position_dodge指定dodgin的宽度.