Changed getData.R to download zipped file