I have a plot which is generated thus:
ggplot(dt.2, aes(x=AgeGroup, y=Prevalence)) + geom_errorbar(aes(ymin=lower, ymax=upper), colour=\"black\", width=
plot(5, ylab=expression("T ">="5"))