уклоненный geom_point в ggplots для представления оценки панели ошибок

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))

ширина = 0,15 определяет ширину панели ошибок.ширина = 0,3 внутри position_dodge указывает ширину dodgin.