See ?rle i.e.:
x=c(0,0,1,1,1,0,1,1,1,0,1,1,1,1,0,0,0,0,0)
rle(x)
Run Length Encoding
lengths: int [1:7] 2 3 1 3 1 4 5
values : num [1:7] 0 1 0 1 0 1 0
I hope this helps
Francisco
>From: Jean-Pierre GERBAL <jeanpierre.gerbal at free.fr>
>To: R-help at stat.math.ethz.ch
>Subject: [R] count repetitions
>Date: Thu, 11 May 2006 17:42:55 +0200
>
>bonjour,
>
>i have a serie : x<-sample(c(0,1),50,T)
>and i want to count the length of each repetition of 0 and of 1
>(0011101110111100000 give 2313145)...
>who have an idea ?
>
>merci :-)
>
>jean-pierre
>
>______________________________________________
>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