data-raw/1 download_source_data.R

In harmonic-analytics/db-censusnz: New Zealand Census Datasets (2018, 2013, 2006)

### Script to download the raw data from Census NZ
### Matt Lie
### Last updated: 19 Mar 2020

# Download Census Data ----------------------------------------------------
download_dir = './data-raw/downloads'
browseURL(URLdecode("https://www.stats.govt.nz/information-releases/statistical-area-1-dataset-for-2018-census-updated-march-2020"))
census_url = URLdecode('https://www3.stats.govt.nz/2018census/SA1Dataset16jul/Statistical%20Area%201%20dataset%20for%20Census%202018%20-%20total%20New%20Zealand%20-%20CSV_updated_16-7-20.zip')
census_zip = paste0(download_dir, '/nz-census-2018.zip')

if (!dir.exists(download_dir)) dir.create(download_dir)
download.file(url = census_url, destfile = census_zip, mode = 'wb')
unzip(zipfile = census_zip, exdir = download_dir)
file.remove(census_zip)