2011-03-10 49 views
1

我使用下面的代碼展示了一些測試,他們的估計和他們的CI呈現errorbar的估計:迴避geom_point在ggplots爲

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作爲替代品,這不是很好。

任何人都可以在這裏啓發我嗎?謝謝!

回答

11

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指定errorbar的寬度。
position_dodge中的width = 0.3指定了dodgin的寬度。