# NOT RUN {
# irregularly observed Gaussian trajectories with constant mean function 1
Y <- rfd(mu=1, X=gaussian.process(), n=10, m=5)
# regularly observed trajectories with a K-L representation
Y <- rfd(X=kl.process(eigen.functions='FOURIER',distribution='LAPLACE'), type='regular')
# }
Run the code above in your browser using DataLab