built city data scraper in R