# Hub Depressed Index
#
# Similarity measure based on common neighbors
#
# This measures assigns lower scores to links adjacent to hubs (high degree
# nodes). It counts common neighbors of two vertices and weigths the result
# by the higher of those vertices' degrees.
#
similarity_hdi <- function(graph, v1, v2, ...){
deg <- igraph::degree(graph)
score <- igraph::cocitation(graph, v = v1)
score <- score[, v2]
score <- score / outer(deg[v1], deg[v2], pmax)
score
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.