## Not run: geopolygon(island) # Paint iceland with
# # color #0 (often white).
#
# geopolygon(island, col = 0, exterior = TRUE)
#
# geopolygon(geolocator(), col = 1) # Paints a region defined
# # by pointing on map black.
#
# # Of the maps available island (iceland) is about the only that
# # is correctly defined as closed polygon so it is the only one that
# # can be painted by geopolygon.
#
# geoplot(grid = FALSE, type = "n")
# # Star by setting up the plot.
# geopolygon(gbdypif.500, col = 4, exterior = FALSE, r = 0)
# # Use geopolygon to draw the 500 m area.
# geopolygon(gbdypif.100, col = 155, exterior = FALSE, r = 0)
# # Draw 100 m are over the 500 m.
# geolines(eyjar, col = 115)
# # Add islands around Iceland.
# gbplot(c(100, 500), depthlab = TRUE)
# # Draw the depth lines, labels on lines.
# geopolygon(island, col = 115, outside = TRUE, r = 0)
# # Draw Iceland over.
# geoplot(grid = FALSE, new = TRUE)
# # Draw lines around Iceland, could also use geolines.
# ## End(Not run)
Run the code above in your browser using DataLab