library(oce)
data(coastlineWorld)
mapPlot(coastlineWorld, type='l', grid=TRUE,
longitudelim=c(-80,0), latitudelim=c(20,50),
projection="mercator", orientation=c(90,-40,0))
lon <- section[["longitude", 'byStation']]
lat <- section[["latitude", 'byStation']]
mapPoints(lon, lat, pch=20, col='red')
Run the code above in your browser using DataLab