# \donttest{
# deformations
data(solar)
m0 <- deform(solar$x, solar$z, solar$n)
# Gaussian process simulations based on fitted deformation model
simulate(m0)
# }
# one-dimensional expansion model with five simulations and specified locations
data(solar)
m1 <- expand(solar$x, solar$z, solar$n)
xvals <- seq(-123.3, -122.25, by = .05)
yvals <- seq(49, 49.4, by = .05)
xyvals <- expand.grid(xvals, yvals)
simulate(m1, 5, newdata = xyvals)
Run the code above in your browser using DataLab