# do.save <- TRUE
# figure("Gulf_of_Lions", do.save=do.save, width=5, height=5, type="pdf")
# plotmap("lion")
# close_fig(do.save)
do.save <- TRUE
plotmap("lion")
close_fig(do.save)
do.save <- FALSE
figure("Gulf_of_Lions", do.save=do.save, width=5, height=5, type="pdf")
plotmap("lion")
close_fig(do.save)
Run the code above in your browser using DataLab