| scores {relations} | R Documentation |
Compute scores for the tuples of an endorelation.
relation_scores(x,
method = c("Barthelemy/Monjardet", "Wei", "Borda",
"Kendall", "differential", "rankB"),
normalize = FALSE)
x |
an object inheriting from class relation,
representing an endorelation. |
method |
character string indicating the method (see details). |
normalize |
logical indicating whether the score vector should be normalized to sum up to 1. |
In the following, consider the pairs of relation R, represented
by x. Available built-in methods are as follows:
"Barthelemy/Monjardet""Wei""Kendall", "Borda""differential""rankB"A vector of scores, with names taken from the relation domain labels.
J.-P. Barthélemy and B. Monjardet (1981), The median procedure in cluster analysis and social choice theory. Mathematical Social Sciences, 1:235–267.
J. C. Borda (1781), Mémoire sur les élections au scrutin. Histoire de l'Académie Royale des Sciences.
M. Kendall (1955), Further contributions to the theory of paired comparisons. Biometrics, 11:43–62.
M. Regenwetter and E. Rykhlevskaia (2004), On the (numerical) ranking associated with any finite binary relation. Journal of Mathematical Psychology, 48:239–246.
T. H. Wei (1952). The algebraic foundation of ranking theory. Unpublished thesis, Cambridge University.
## Example taken from Cook and Cress (1992, p.74)
I <- matrix(c(0, 0, 1, 1, 1,
1, 0, 0, 0, 1,
0, 1, 0, 0, 1,
0, 1, 1, 0, 0,
0, 0, 0, 1, 0),
ncol = 5,
byrow = TRUE)
R <- relation(domain = letters[1:5], incidence = I)
## Note that this is a "preference matrix", so take complement:
R <- !R
## Compare Kendall and Wei scores
cbind(
Kendall = relation_scores(R, method = "Kendall", normalize = TRUE),
Wei = relation_scores(R, method = "Wei", normalize = TRUE)
)