[R-br] ajuda contar subperiodos no R

Luis Iván Ortiz Valencia liov2067 em gmail.com
Quinta Março 29 15:58:03 BRT 2012


isto pode ajudar

> x
 [1] 1 0 0 0 1 1 0 1 0 0 0 0
> rle(x)
Run Length Encoding
  lengths: int [1:6] 1 3 2 1 1 4
  values : num [1:6] 1 0 1 0 1 0
> length(rle(x)[[2]])
[1] 6


Em 29 de março de 2012 15:55, Lucas Fernandes de Souza
<luc.souza em usp.br> escreveu:
> ok...deu certo, muito obrigado...Agora, como eu consigo salvar esse
> resultado...
> estou tentando salvar com o seguinte comando write.table, mas fala que não é
> data.frame...
> obrigado mais uma vez
>
>
>
> Citando Benilton Carvalho <beniltoncarvalho em gmail.com>:
>
>
>> exemplo = structure(list(X1979 = c(1L, 0L, 0L, 0L, 0L, 0L, 0L, 1L, 0L,
>> 0L, 1L, 0L, 1L, 0L, 1L, 1L, 1L, 1L, 1L, 0L, 0L, 1L, 1L, 1L, 1L,
>> 1L, 1L), X1980 = c(0L, 0L, 1L, 1L, 1L, 0L, 0L, 1L, 0L, 0L, 1L,
>> 1L, 1L, 1L, 0L, 0L, 0L, 0L, 1L, 1L, 1L, 1L, 0L, 0L, 0L, 0L, 0L)),
>> .Names = c("X1979", "X1980"), class = "data.frame",
>> row.names = c(NA, -27L))
>>
>> lapply(exemplo, rle)
>>
>> O resultado sera:
>>
>> $X1979
>> Run Length Encoding
>>  lengths: int [1:11] 1 6 1 2 1 1 1 1 5 2 ...
>>  values : int [1:11] 1 0 1 0 1 0 1 0 1 0 ...
>>
>> $X1980
>> Run Length Encoding
>>  lengths: int [1:9] 2 3 2 1 2 4 4 4 5
>>  values : int [1:9] 0 1 0 1 0 1 0 1 0
>>
>> a interpretacao fica pra vc... assim como a dica da criacao do conjunto de
>> dados de exemplo.
>>
>> b
>>
>
>
>
> --
> Lucas F. de Souza
> Eng. Agrícola - CONAB
> M.Sc. Produção Vegetal - UENF
> Doutorando Engenharia de Sistemas Agrícolas - ESALQ/USP
> tel: (19) 8160-7068
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
> mínimo reproduzível.



-- 
Luis Iván Ortiz Valencia
Doutorando Saúde Pública - Epidemiologia, IESC, UFRJ
Estatístico Msc.
Spatial Analyst Msc.


Mais detalhes sobre a lista de discussão R-br