El siguiente código de ejemplo:

require(ggplot2)

stats <- data.frame(Day=0:5, Mean=c(3.2, 2.7, 0.8, 0.2, 0, 0), Q10=0.0, Q90=c(7.48, 4.0, 2.2, 1.2, 0, 0))

plot <- ggplot(stats, aes(x=Day, y=Mean)) +
  geom_point(size=4) +
  geom_line(size=1.5) +
  geom_errorbar(aes(ymin=Q10, ymax=Q90), width=0.2) +
  ggtitle("Example") +
  ylab("Pain Score") +
  scale_x_continuous("Day", expand=c(0.02,0), limits=c(0,15), breaks=0:15, labels=c("DOS", 1:15)) +
  scale_y_continuous("Pain Score", expand=c(0.02,0), limits=c(0,10), breaks=0:10)

print(plot)

Produce la siguiente trama:

No he podido averiguar por qué la barra de error más a la izquierda no tiene 'T' en los extremos.