Create barplot_sidebyside_ggplot2.R