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@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