Update Week2Project.R