Hello,

Try the following.

r <- cumsum(c(TRUE, diff(d) != 0))


Hope this helps,

Rui Barradas


Em 12-03-2014 09:13, T Bal escreveu:
Hi,
I have the following numbers:

d <- c(8,7,5,5,3,3,2,1,1,1)

I want to convert these into the following numbers:

r:
1,2,3,3,4,4,5,6,6,6

So if two numbers are different increment it if they are same then assign
the same number:

r <- NULL

for (i in 1:length(d)) {

  if (d[i] != d[i+1]) {
   r[i] =i+1;
  }
  else {
   r[i] = i;
  }
  }

But this is not correct. How can I solve this problem? or how can I solve
it in a different way? Thanks a lot!

        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.


______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to