symdif {raster} | R Documentation |
Symetrical difference of SpatialPolygons* objects
## S4 method for signature 'SpatialPolygons,SpatialPolygons'
symdif(x, y, ...)
x |
SpatialPolygons* object |
y |
SpatialPolygons* object |
... |
Additional SpatialPolygons* object(s) |
SpatialPolygons*
#SpatialPolygons
if (require(rgdal) & require(rgeos)) {
p <- shapefile(system.file("external/lux.shp", package="raster"))
b <- as(extent(6, 6.4, 49.75, 50), 'SpatialPolygons')
crs(b) <- crs(p)
sd <- symdif(p, b)
plot(sd, col='red')
}