removed get and checking data from function in plot1.R and just reused the code instead of checking to see if the function was there, and if it was not sourceing the function.

Additionally add plot3.R and plot4.R