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