inst/testdata-raw/create_flex_zones_ref_rda.R

# save output
fpath = system.file("testdata",  package = "smerc")

data(nydf)
coords = as.matrix(nydf[, c("x", "y")])
data(nyw)
flex5_zones_ref = flex.zones(coords, nyw, k = 5)

fname = paste(fpath, "/flex5_zones_ref.rda", sep = "")
save(flex5_zones_ref,
     compress = "bzip2",
     file = fname,
     version = 3)
jpfrench81/smerc documentation built on Jan. 13, 2024, 4:30 a.m.