Přeji vám významný rok 2015!

library(ggplot2)

candles <- data.frame(yearss=c("A","B","C","D"),yearsn=c(2,0,1,5), ci=c(1.2, 0, 0.8, 0.9))
levels(candles$yearss) <- c("2", "0", "1", "5")

ggplot(candles, aes(y=yearsn, x=yearss)) +
  geom_bar(fill="darkred", col="black") +
  geom_errorbar(width=.15, aes(ymin= yearsn, ymax=years+ci)) +
  ylim(0,7) +
  ggtitle("Pour") + xlab("") + ylab("Féliciter") +
  theme_bw(base_size=30) + 
  theme(axis.text.y=element_blank())