data(cosomap)
data(faults)
data(hiways)
data(owens)
##
if (FALSE) {
proj = cosomap$PROJ
plotGEOmapXY(cosomap, PROJ=proj, add=FALSE, ann=FALSE, axes=FALSE)
plotGEOmapXY(hiways, PROJ=proj, add=TRUE, ann=FALSE, axes=FALSE)
plotGEOmapXY(owens, PROJ=proj, add=TRUE, ann=FALSE, axes=FALSE)
plotGEOmapXY(faults, PROJ=proj, add=TRUE, ann=FALSE, axes=FALSE)
}
Run the code above in your browser using DataLab