data-raw/kfs-polygon.R

library(rgdal)
kfs <- readOGR(
  dsn= "data-raw/kfs_shapefile/layers/",
  layer="POLYGON",
  verbose=FALSE
)
#proj4string(kfs) <-CRS("+proj=utm +zone=10+datum=WGS84")

class(kfs)

kfs_boundary <- kfs
usethis::use_data(kfs_boundary, overwrite = TRUE)
ericmkeen/bangarang documentation built on Feb. 10, 2024, 2:58 p.m.