Week 1 Project
2nd Project
plot1.R