I have not been able to find a way to do dense rank in R

Here is an example of what I need

rank() gives the following

5 rank 1
7 rank 2
7 rank 2
9 *rank 4*

but I want

5 rank 1
7 rank 2
7 rank 2
9 *rank 3*
*
*
thanks
SS

	[[alternative HTML version deleted]]

