Final adjustments plot2.R