pairwise_matrix <- function(similarity,cardnames){ #similarity is a list of similarity matrices (all_similarity from Compile output)
names <- ps_PairwiseNames(cardnames)
output <- ps_Pairwise(similarity)
colnames(output) <- names
output
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.