R中的错误栏？

Question

我需要一个好的错误栏功能。

我已经尝试了包（心理），但在这里我无法移除x轴，我也尝试了包（ggplot2），但在这里我不能使用第二个y轴。任何人都可以推荐我在R中制作错误栏的好方法吗？

Answer 1

请参阅包?errbar

中的Hmisc

 group <- factor(sample(1:10,100,T))
y <- (1:10)[group] + rnorm(100)
grmean <- tapply(y,group,mean)
lims <- tapply(y,list(group),FUN = sd)*2
errbar( 1:10, grmean, grmean + lims, grmean - lims , xaxt="n" )
axis(3)

给出：