Update NewGetData.R

Adding code of year 2003&2004