Create barplot_accumulation.R