mytheme2 <- theme_fivethirtyeight() %+replace% theme(axis.text.x=element_text(angle=20,hjust=1,vjust=1, face="bold", size=9),
                                                     axis.text =element_text(face="bold"),
                                                     axis.title= element_text(face="bold"),
                                                     legend.position=c(1,1),
                                                     legend.justification = c(1, 1),
                                                     legend.title=element_text(size=10, face="bold") ,
                                                     legend.text=element_text(size=20, face="bold"))

p <- ggplot(df.long, aes(ROIs, `Mean L2 Norm Error`, fill!=colour))+
geom_bar(stat="identity",position="dodge", width=0.75)+
  mytheme2+
  scale_fill_hue(h=c(180,360),c=80,l=80)+
  coord_cartesian(ylim=c(0.005, 0.02))