library(BayesGPfit)
library(lattice)
set.seed(1224)
dat = list()
dat$x = GP.generate.grids(d=1,num_grids = 100)
curves = GP.simulate.curves.fast(n = 10, dat$x,a=0.01,b=0.5,poly_degree=20L)
GP.plot.curves(curves,main="Simulated Curves")
Run the code above in your browser using DataLab