#read the shapefile
#display first five rows of shapefile dataset
#plot the shapefile boundaries
## Not run:
# usMap <- readShapePoly(system.file("shapes/usMap.shp", package="mapStats")[1])
# head(usMap@data)
# plot(usMap)
# ## End(Not run)
Run the code above in your browser using DataLab