Nothing
# Laplacian Eigenmaps
.LEM <- function(X, K, alpha, ndim){
# kNN-adjacency matrix
A <- .knn_adjacency(X, K)
# Graph Laplacian matrix
D <- .spDiagMatrix(K, nrow(X))
D - A
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.