Como baixo este pacote seas, tentei baixar e diz que não existe para R14.0 Olá Inajara cole as colunas, ano, mes e dia e depois converta para a classe date. exemplo: x <- expand.grid(ano=2000,mes=1, dia=1:31) ## gerando dados de chuva x$Precip <- sample(c(0,1), 31, replace=T) ## adicionando coluna "date" ao dataframe x$date <- as.Date(do.call("paste", c(x[,1:3], sep="-"))) require(seas) CCS <- interarrival(x, var="Precip",inv=T) ## inv = T, a data de saída corresponde a data do primeiro dia seco da sequencia de dias secos ## a variável de interesse no seu caso é a "dry" CCS date dry wet 1 2000-01-02 1 NA 2 2000-01-04 2 1 3 2000-01-07 2 1 4 2000-01-13 1 4 5 2000-01-17 2 3 6 2000-01-21 1 2 7 2000-01-23 2 1 8 2000-01-26 1 1 [ ]'s