powered by
rings(obj) rings(object) <- value
data(ncshp) nc1 <- as.SpatialRings.Shapes(nc.shp$Shapes, as.character(nc.shp$att.data$FIPS)) df <- nc.shp$att.data rownames(df) <- df$FIPS rings(df) <- nc1 class(df)
Run the code above in your browser using DataLab