Create prettyPlots.R