Nothing
mlKmeans <- function(X, y) {
X <- as.matrix(X)
y <- as.numeric(y)
.Call( "RcppMLPACK_kmeans", X, y, PACKAGE = "RcppMLPACK" )
}
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.