View source: R/affinesubspace_variable.R
use local PCA
1 | diglocal_variable(data, k = 10, pcaratio = 0.9, center.by.data = TRUE)
|
1 2 3 4 5 | ## Not run:
X = as.matrix(iris[,1:4])
digs = diglocal_fixed(X)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.