# NOT RUN {
##Generate irregular dataset
set.seed(2705)
ds <- sampleFuncy(reg=FALSE, obsNr=100, timeNrMin=5, timeNrMax=10)
reg <- regFuncy(Data(ds), timeNr=10, baseType="splines",nbasis=5, method="project")
reg <- regFuncy(Data(ds),timeNr=10, method="interpolate")
# }
# NOT RUN {
reg <- regFuncy(Data(ds), timeNr=10, baseType="eigenbasis", nbasis=5,
method="project")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab