# extract provided archive
a <- fetch(dat="paleomap", var="model",
datadir=system.file("extdata", package="chronosphere"))
# manually attach
model <- platemodel(file.path(tempdir(),
"paleomap_model_v19o_r1c/paleomap_model_v19o_r1c.mod"))
model
Run the code above in your browser using DataLab