Get David's Scores of Individuals

Get David's Scores of Individuals. Useful to evaluate social rank. Its original version is "R/ds.R" package.

Get David's Scores of Individuals

Gammell et al, 2003, David's score: a more appropriate dominance ranking method than Clutton-Brock et al.'s index, Animal Behaviour.

ORIGINAL from R package https://rdrr.io/cran/compete/man/ds.html and https://rdrr.io/cran/EloRating/src/R/DS.R

2021-7-21, CHEN xinfeng, 北京脑科学与类脑研究中心，[e-mail]

---- Example ----

% Identical to https://rdrr.io/cran/compete/man/ds.html 
% > davidscore(m, norm = true, type = "D")
m=[NaN,0,0,0,0,1;
  2,NaN,1,0,0,0;
  30,18,NaN,0,0,4;
  6,  0,  3,NaN,5,4;
  19,19,8,267,NaN,1;
  122,85,84,50,10,NaN];

davidscore(m,false)   %[1]
davidscore(m,false, 'P') %[2]
davidscore(m) %[3], recommend

----Example output----

[1]  -12.4902   -6.2707   -2.2101    0.4941    8.0409   12.4359
[2]  -13.9512   -5.7767   -2.9904    1.5021    8.4535   12.7627
[3] 0.4183    1.4549    2.1317    2.5823    3.8402    4.5726