Here are a couple of solutions: rx <- rank(x) order(-order(rev(x)))[match(rx,rx)]
rx <- rank(x) (2*rx-rank(x,tie="first"))[match(rx,rx)] Douglas Grove <dgrove <at> fhcrc.org> writes: : : Hi, : : I'm wondering if anyone can point me to a function that will : allow me to do a ranking that treats ties differently than : rank() provides for? : : I'd like a method that will assign to the elements of each : tie group the largest rank. : : An example: : : For the vector 'v', I'd like the method to return 'rv' : : v: 1 2 3 3 3 4 5 5 6 7 : rv: 1 2 5 5 5 6 8 8 9 10 : : : Thanks, : Doug Grove ______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
