tests/testthat/test.spong.R

g = geom_from_points(SpatialPoints(
    cbind(311421+100*runif(10),501269+100*runif(10))
    ,proj4string=CRS("+init=epsg:27700")))

ng = data.frame(name=letters[1:10],
    the_geom=g
    )
barryrowlingson/spong documentation built on May 11, 2019, 8:30 p.m.