在R / GGPLOT2中绘制百分点指示

Question

我有一个两列数据框的基本图（x =“Periods”和y =“Range”）。

library (ggplot2)
qplot (Periods, Range, data=twocoltest, color=Periods, size = 3,) + geom_jitter(position=position_jitter(width=0.2))

我试图在每个时期添加一条水平线，该水平线占该时期所有观测值的90％。 （它不必是水平线，每个时期的任何视觉指示就足够了）。

非常感谢任何帮助。

Answer 1

好的，我已经阅读了ggplot帮助，这里有一个去：

# example data 
twocoltest <- data.frame(Periods=rep(1:3,each=3),Range=1:9)

library(ggplot2)
c <- qplot (Periods, Range, data=twocoltest, color=Periods, size = 3,) + geom_jitter(position=position_jitter(width=0.2))
q90 <- function(x) {quantile(x,probs=0.9)}

c + stat_summary(fun.y=q90, colour="red", geom="crossbar", size = 1, ymin=0, ymax=0)