week 3 assignment
Project1 . Functions.R