library(distanceParallel) matrix <- replicate(50, rnorm(50)) #50 x 50 matrix
distanceParallel
and a custom distance functiony <- create_pairwise_comparisons( matrix, ncores = 4, distfun = function(x1, x2) sqrt(sum((x1 - x2) ^ 2))) y <- create_distance_matrix(pairwise_dist = y, diag_val = 0)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.