Update getData.R