Create plot3.R

R code for the third plot. Data should be in the same folder.