[R-br] plotar erro padrão usando "arrows"

[Benilton Carvalho]

exemplo de dados seria bem-vindo (por exemplo, media vs. o q? grupos?
um determinado valor de preditor?)

set.seed(1)
medias <- rnorm(10)
grupos <- 1:10
dvpd <- seq(.5, 1, length.out=10)
lsup <- medias+dvpd
linf <- medias-dvpd

plot(grupos, medias, ylim=c(min(linf), max(lsup)))
arrows(grupos, medias, y1=lsup)
arrows(grupos, medias, y1=linf)

b