25/8
??sweave
library(oce)
data(topoMaritimes)
plot(topoMaritimes, xlim=c(-66, -58), ylim=c(44, 50),#
    water.z=c(  -50, -100, -150, -200, -300, -400, -500, -1000, -2000),#
    lwd.water=c(  1,    1,    1,    1,    1,   1,   1.5,   1.5,   1.5))
?plot.topo
plot(topoMaritimes, center=c(46,-62), span=800,#
    water.z=c(  -50, -100, -150, -200, -300, -400, -500, -1000, -2000),#
    lwd.water=c(  1,    1,    1,    1,    1,   1,   1.5,   1.5,   1.5))
q()
