This is my code
ggplot(df, aes(x=timepoint, y=mean, fill=group)) + geom_bar(position=position_dodge(.3), colour=\"black\", stat=\"identity\",
Just adjust the widths:
ggplot(df, aes(x=timepoint, y=mean, fill=group)) + geom_bar(position=position_dodge(0.9), colour="black", stat="identity", width=0.9, , binwidth=0) + geom_errorbar(position=position_dodge(0.9), width=0.85, aes(ymin=mean, ymax=mean+sem)) + theme_bw()