data-raw/tax_2017.R

library(readr)
source('data-raw/munge_tax.R')

url <- "https://opendata.vancouver.ca/explore/dataset/property-tax-report/download/?format=csv&refine.report_year=2017&timezone=America/Los_Angeles&lang=en&use_labels_for_header=true&csv_separator=%3B"

tax_2017 <- munge_tax(url)

#write_csv(tax_2018, "data-raw/tax_2017.csv")
save(tax_2017, file = "data/tax_2017.rda", compress = 'bzip2')
saveRDS(tax_2017, "tests/testthat/tax_2017.rds")
UBC-MDS/taxyvr documentation built on Nov. 10, 2020, 8:11 p.m.