# NOT RUN {
# Plot to file from "custom.trend" object
data(t) # "custom.trend" object
str(t) # check object
# -------------------------------------------------------------------------
# The following call to msl.fileplot can be found in the temporary
# directory under the file name "Plot1.jpeg".
# -------------------------------------------------------------------------
wd <- tempdir() # find temp directory
msl.fileplot(t, wdir = wd) # default screen plot output
# }
Run the code above in your browser using DataLab