Finished loading data script, added plot1.R and plot1.png