In ATFutures/moveability: Moveability statistics for any specified city

script to generate `data/castlemaine.rda`

library (osmdata)

castlemaine <- opq ("castlemaine australia") %>%
    add_osm_feature (key = "highway") %>%
    osmdata_sc (quiet = FALSE)

There is one non-ASCII character:

i <- grep ("Archdeacon", castlemaine$object$value)
castlemaine$object$value [i] <- "Archdeacon's Pass"

usethis::use_data (castlemaine, overwrite = TRUE, compress = 'xz')

devtools::load_all (export_all = FALSE)
castlemaine_green <- get_green_space ("castlemaine autralia")
usethis::use_data (castlemaine_green, overwrite = TRUE, compress = 'xz')
castlemaine_attr <- get_attractors ("castlemaine australia")
usethis::use_data (castlemaine_attr, overwrite = TRUE, compress = 'xz')