library(oce)
data(coastlineWorld)
longitude <- coastlineWorld[['longitude']]
latitude <- coastlineWorld[['latitude']]
## Canada and Arctic Ocean, with 500m isobath in blue
mapPlot(longitude, latitude, type='l',
latitudelim=c(50,120), longitudelim=c(-80,10),
grid=10,
projection="orthographic", orientation=c(45,-100,0))
data(topoWorld)
lon <- topoWorld[['longitude']]
lat <- topoWorld[['latitude']]
z <- topoWorld[['z']]
mapContour(lon, lat, z, levels=-1000, lty='dotted')
Run the code above in your browser using DataLab