Update GettingData.R

Change the year