[R] count sequence of integers

[Martin Becker]

Samuel Kemp wrote:
> Hi,
>
> I would like to be able to count a sequence of numbers. For example, given a
> vector of the following integers
>
> (1,1,1,2,2,2,2,3,3,3,3,3,3,1,1,1,1, 3,3)
>
> the function would return
>
> (3, 4, 6, 4,2)
>
> Does anyone have any cool ideas to solve this?
>
>   
Maybe not the most efficient way, but

 >  count <- function (x) diff(c(0,which(diff(x)!=0),length(x)))

should work (for integer sequences!):

 >  x<-c(1,1,1,2,2,2,2,3,3,3,3,3,3,1,1,1,1,3,3)
 >  count(x)
[1] 3 4 6 4 2

Regards,

  Martin

> Any help appreciated.
>
> Regards,
>
> Sam.
>
> 	[[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at stat.math.ethz.ch 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.
>