[R] Identify duplicate numbers and to increase a value

[Ortiz, John]

Hi everybody.

I want to identify duplicate numbers and to increase a value of 0.01 for each time that it is duplicated.  

Example:
x=c(1,2,3,5,6,2,8,9,2,2)

I want to do this:

1
2 + 0.01
3
5 
6
2 + 0.02
8
9
2 + 0.03
2 + 0.04

I am trying to get something like this:

1
2.01
3
5
6
2.02
8
9
2.03
2.04

Actually I just know the way to identify the duplicated numbers

rbind(x, duplicated(x) | duplicated(x, fromLast=TRUE))

  [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
x    1    2    3    5    6    2    8    9    2     2
     0    1    0    0    0    1    0    0    1     1

Some advice?

Thanks and regards
John Ortiz