data-raw/maps.R

In validmeasures/wsup: An Implementation of the WSUP Urban Water and Sanitation Survey in R

library(maptools)
library(rgeos)
library(rgdal)
library(gstat)
library(raster)

options(stringsAsFactors = FALSE)


accra <- readOGR(dsn = "data-raw/accra",
                 layer = "accra")
usethis::use_data(accra, compress = "xz", overwrite = TRUE)

antananarivo <- readOGR(dsn = "data-raw/antananarivo",
                        layer = "tnr2")
usethis::use_data(antananarivo, compress = "xz", overwrite = TRUE)

dhaka <- readOGR(dsn = "data-raw/dhaka",
                 layer = "dhaka")
usethis::use_data(dhaka, compress = "xz", overwrite = TRUE)

lusaka <- readOGR(dsn = "data-raw/lusaka",
                  layer = "lusaka")
usethis::use_data(lusaka, compress = "xz", overwrite = TRUE)

maputo <- readOGR(dsn = "data-raw/maputo",
                  layer = "maputo")
usethis::use_data(maputo, compress = "xz", overwrite = TRUE)

nakuru <- readOGR(dsn = "data-raw/nakuru",
                  layer = "nakuru")
usethis::use_data(nakuru, compress = "xz", overwrite = TRUE)

corporations <- readOGR(dsn = "data-raw/dhakaCorporations",
                        layer = "dhakaCorporations")
usethis::use_data(corporations, compress = "xz", overwrite = TRUE)