## Not run:
# library(oce)
# data(coastlineWorld)
# mapPlot(coastlineWorld, type='l',
# longitudelim=c(-80,10), latitudelim=c(35,80),
# projection="+proj=ortho", orientation=c(35, -35, 0))
# ## Great circle from New York to Paris (Lindberg's flight)
# l <- geodGc(c(-73.94,2.35), c(40.67,48.86), 1)
# mapLines(l$longitude, l$latitude, col='red', lwd=2)
# ## End(Not run)
Run the code above in your browser using DataLab