powered by
SP_ID
AREA
TRACT
POPULATION
HHMEDINC
FAR
AGE
CHICAGO
CAREA
cook <- readShapePoly(system.file("maps/CookCensusTracts.shp", package="McSpatial")) sampvar <- cook$CHICAGO==1|(!is.na(cook$CAREA)&cook$CAREA=="O'Hare") chicago <- cook[sampvar==TRUE,]
Run the code above in your browser using DataLab