add getData.R