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