data(toyRegFD)
varSel <- selectFunctional( toyRegFD$FDlist, toyRegFD$Y, normalize=FALSE,
dimensionReductionMethod="fpca", nbasisInit=16,
verbose=FALSE, ntree=10)
summary(varSel)
plot(varSel)
Run the code above in your browser using DataLab