demo/sample_shape.R

library(rgeos)
library(NCDFSG)
library(maptools)
multipoly <- readWKT("GEOMETRYCOLLECTION(MULTIPOLYGON (((35 25, 30 30, 25 28, 26 23, 35 25)), ((22 22, 22 27, 15 25, 10 20, 22 22))), POLYGON ((30 10, 30 20, 20 20, 10 15, 30 10)))", id = c("1","2"))
ToNCDFSG("inst/demoPoly.nc",multipoly)
spd<-FromNCDFSG("inst/demoPoly.nc")
writePolyShape(spd,"inst/demoShape")
dblodgett-usgs/NCDFSG documentation built on May 15, 2019, 1:21 a.m.