powered by
tapering.cv(matrix, h = 1/2, n.cv = 10, norm = "F", seed = 142857)
data(m.excess.c10sp9003) retcov.cv <- tapering.cv(m.excess.c10sp9003, n.cv = 10, norm = "F", seed = 142857) summary(retcov.cv) plot(retcov.cv) # Low dimension
Run the code above in your browser using DataLab