Try this: rle(signData)$lengths[rle(signData)$values == 1]
On Tue, Jul 7, 2009 at 8:11 AM, aledanda <danda.ga...@gmail.com> wrote: > > Hallo, > > I have an other problem, I have this vector signData with an alternation of > 1 and -1 that corrispond to the duration of two different percepts. I > extracted the durations like this: > > signData<- scan("dataTR10.txt") > dur<-rle(signData)$length > > Now I would like to extract only the positive duration, e.g. > > signData <- c(1,1,1,1,-1,-1,-1,1,1,-1,-1) > posduration <- c(4,2) > > I think I should use rle in a nested way, this is what I tried but it > doesn't work: > > posduration<- rle(signData[=1])$length > > Could you please help me? > > Thanks a lot, this forum is extremely useful. > > Ale > -- > View this message in context: > http://www.nabble.com/rle-tp24371336p24371336.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > 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. > -- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O [[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.