Cleaned up formatting in plot1.R