Create plot1.R

This is my first plot. There are many links to the resources I used while doing it.