pairwise <- function(similarity){
output <- data.frame()
for (r in 1:length(similarity)){
output <- rbind(output, similarity[[r]][upper.tri(similarity[[r]])])
}
output
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.