Hi,

I'm looking for a function that takes a list and calculates a score based on
how well "like attracts like".
For example:

list1 <- c(john, eric, steve, john, eric, scott, john)
list2 <- c(john, john, john, eric, eric, steve, scott)

score(list1) < score(list2)

Both lists are composed of the same names and frequency of each
name.

Not sure how else to put it.  I am relatively new to R.  Have tried the
modularity function, but can't seem to get it to work for this purpose.


Any help is appreciated.

Steve

	[[alternative HTML version deleted]]

