Raw Message

Message-ID: <F49C61C25DEB0C48B7A660D6379C6B9703E9853E58@SI-MSEV02.US.SINET.SI.EDU>
Date: 2011-01-20T15:12:33Z
From: Ortiz, John
Subject: Identify duplicate numbers and to increase a value

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