Create plot1.R

#Made with RStudio