ggplot(mydata)+
geom_rect(aes(xmin = xmin, xmax = xmax, ymin = 0,
ymax = meanage, fill = Name), color = "black", size = 0.25)+
geom_errorbar(aes(x = label, ymin = meanage - meansd,
ymax = meanage + meansd), width=0.1, color='black',
position = position_dodge(), size=0.8)+
geom_text(aes(x = label, y = -5, label = ""), size = 4, col = "black")