Examples for 'maptools::spCbind-methods'


cbind for spatial objects

Aliases: spCbind-methods spCbind,SpatialPointsDataFrame,data.frame-method spCbind,SpatialPointsDataFrame,vector-method spCbind,SpatialLinesDataFrame,data.frame-method spCbind,SpatialLinesDataFrame,vector-method spCbind,SpatialPolygonsDataFrame,data.frame-method spCbind,SpatialPolygonsDataFrame,vector-method spCbind

Keywords: methods spatial

### ** Examples

xx <- readShapePoly(system.file("shapes/sids.shp", package="maptools")[1],
  IDvar="FIPSNO", proj4string=CRS("+proj=longlat +ellps=clrk66"))
Warning: readShapePoly is deprecated; use rgdal::readOGR or sf::st_read
library(foreign)
xtra <- read.dbf(system.file("share/nc_xtra.dbf", package="maptools")[1])
o <- match(xx$CNTY_ID, xtra$CNTY_ID)
xtra1 <- xtra[o,]
row.names(xtra1) <- xx$FIPSNO
xx1 <- spCbind(xx, xtra1)
names(xx1)
 [1] "AREA"      "PERIMETER" "CNTY_"     "CNTY_ID"   "NAME"      "FIPS"     
 [7] "FIPSNO"    "CRESS_ID"  "BIR74"     "SID74"     "NWBIR74"   "BIR79"    
[13] "SID79"     "NWBIR79"   "CNTY_ID.1" "east"      "north"     "L_id"     
[19] "M_id"      "names"    
identical(xx1$CNTY_ID, xx1$CNTY_ID.1)
[1] FALSE

[Package maptools version 1.1-4 Index]