# \donttest{
library(oce)
data(coastlineWorld)
longitude <- coastlineWorld[["longitude"]]
latitude <- coastlineWorld[["latitude"]]
mapPlot(longitude, latitude, type="l", grid=5,
longitudelim=c(-70,-50), latitudelim=c(45, 50),
projection="+proj=merc")
lon <- -63.5744 # Halifax
lat <- 44.6479
mapPoints(lon, lat, pch=20, col="red")
mapText(lon, lat, "Halifax", col="red", pos=1, offset=1)
# }
Run the code above in your browser using DataLab