# read toy data
data(toydata)
## Not run: can take several minutes
# # perform one-sample regression
# res = gpr2sample(toydata$ctrl$x, toydata$ctrl$y, seq(0,22,0.1))
#
# # pre-computed model for toydata
# data(toygps)
# res = toygps$ctrlmodel
#
# # basic plot with data, estimated mean and 95\%
# plot(res)
#
# # don't plot the data, plot some samples drawn from the learned gp
# plot(res, plotdata=FALSE, samples=3)## End(Not run)
Run the code above in your browser using DataLab