No post anterior vimos como calcular os intervalos de confiança para um conjunto de dados. Irei utilizar nos exemplos os mesmos conjuntos de dados e funções do post anterior.

Para construir um gráfico com essas informações no R segue uma função adaptada da solução que encontrei aqui:

plot_inter_conf <- function(x, y, upper, lower=upper, length=0.1,...){
 if(length(x) != length(y) | length(y) !=length(lower) | length(lower) != length(upper))
 stop("vectors must be same length")
 arrows(x,upper, x, lower, angle=90, code=3, length=length, ...)
}

grafico <- barplot(mean(lista), names.arg=c(1),ylim=c(0,6), col="blue", axis.lty=1, xlab="", ylab="")

plot_inter_conf(grafico, mean(lista), inter_conf(lista)[2], inter_conf(lista)[1])