Skip to content

Instantly share code, notes, and snippets.

@dsparks

dsparks/Jaccard Similarity Coefficient.R

Created February 14, 2011 03:24
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save dsparks/825440 to your computer and use it in GitHub Desktop.
Save dsparks/825440 to your computer and use it in GitHub Desktop.
Download ZIP
Jaccard similarity for person-to-group-like matrices
Raw
Jaccard Similarity Coefficient.R
Jaccard <- function(matrix){
Intersection <- matrix %*% t(matrix)
Union <- ncol(matrix) - (!matrix) %*% t(!matrix)
Jaccard <- Intersection / Union
return(Jaccard)
}
@dsparks
Copy link
Author

dsparks commented Feb 14, 2011

See: http://en.wikipedia.org/wiki/Jaccard_index

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment