library(BayesGPfit)
library(lattice)
set.seed(1224)
##plot 1D curve
x1d = GP.generate.grids(d=1,num_grids = 1000)
curve1d = GP.simulate.curve.fast(x1d,a=0.01,b=0.5,
poly_degree=10L)
GP.plot.curve(curve1d,main="Simulated 1D Curve")
##plot 2D curve
x2d = GP.generate.grids(d=2L,num_grids = 100)
curve2d = GP.simulate.curve.fast(x2d,a=0.01,b=0.5,
poly_degree=10L)
GP.plot.curve(curve2d,main="Simulated 2D Curve")
##plot 3D curve
x3d = GP.generate.grids(d=3,num_grids = 50)
curve3d = GP.simulate.curve.fast(x3d,a=0.01,b=0.5,
poly_degree=10L)
GP.plot.curve(curve3d,main="Simulated 3D Curve",num_slices=10,zlim=c(-0.5,0.5))
Run the code above in your browser using DataLab