# Create Matern covariance functions with different smoothness
cov_rough <- kernel.matern(nu = 0.5) # Equivalent to exponential
cov_smooth <- kernel.matern(nu = 2.5) # Twice differentiable
t <- seq(0, 1, length.out = 50)
# Compare sample paths
fd_rough <- make.gaussian.process(n = 5, t = t, cov = cov_rough, seed = 42)
fd_smooth <- make.gaussian.process(n = 5, t = t, cov = cov_smooth, seed = 42)
Run the code above in your browser using DataLab