[R] Search for longest consecutive occurrence

[Gabor Grothendieck]

!!

On Sat, May 23, 2009 at 1:52 PM, tsunhin wong <thjwong at gmail.com> wrote:
> Thanks!
> I tested it using:
> test<-c(1,1,1,1,1,0,0,0,0,0,0,0,1,1,0,1,0,1,0,1,1)
> that has a longer 7 zeros and 5 ones.
>
> What part of the script does the selection of ones instead of zeros?
>
> - John
>
> On Sat, May 23, 2009 at 1:17 PM, Gabor Grothendieck
> <ggrothendieck at gmail.com> wrote:
>> Try this:
>>
>> with(rle(test), max(lengths[!!values]))
>>
>>
>> On Sat, May 23, 2009 at 1:09 PM, tsunhin wong <thjwong at gmail.com> wrote:
>>> Dear R Users,
>>>
>>> I am trying to write a script to count the longest consecutive
>>> occurring 1 in a sequence:
>>> test<-c(1,1,1,1,1,1,1,0,0,0,0,1,1,0,1,0,1,0,1,1)
>>>
>>> In the case of the object "test", 1 occurs 7 consecutive times which
>>> is the longest consecutive within the sequence.
>>> I know I can always do a thorough from start to end search and use a
>>> counter to count.
>>> But, do you know there can be a smarter way to achieve this in R?
>>>
>>> Thanks a lot!
>>>
>>> - John
>>>
>>> ______________________________________________
>>> R-help at 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.
>>>
>>
>