Plot1.R

I had submitted this during last class but updated and re-submitted again