# This example takes one minute to run
## Not run:
# data("logd1k")
# x = logd1k$x
# y = logd1k$y
#
# set.seed(42)
# cvfit = cv.enspls(x, y, reptimes = 10)
# print(cvfit)
# plot(cvfit)## End(Not run)
Run the code above in your browser using DataLab