Plot1.R

This code makes the first plot of the assignment