<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1252">
<META content="MSHTML 6.00.2900.3429" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial color=#0000ff>Como baixo este pacote seas, tentei baixar e
diz que não existe para R14.0</FONT></DIV>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">Olá Inajara<BR><BR>cole as colunas, ano, mes e
dia e depois converta para a classe date.<BR>exemplo:<BR><BR>x <-
expand.grid(ano=2000,mes=1, dia=1:31)<BR>## gerando dados de chuva<BR>x$Precip
<- sample(c(0,1), 31, replace=T)<BR><BR>## adicionando coluna "date" ao
dataframe<BR>x$date <- as.Date(do.call("paste", c(x[,1:3],
sep="-")))<BR><BR>require(seas)<BR><BR>CCS <- interarrival(x,
var="Precip",inv=T)<BR>## inv = T, a data de saída corresponde a data do
primeiro dia seco da sequencia de dias secos<BR>## a variável de interesse no
seu caso é a "dry"
<BR>CCS<BR> date dry wet<BR>1
2000-01-02 1 NA<BR>2 2000-01-04 2
1<BR>3 2000-01-07 2 1<BR>4 2000-01-13
1 4<BR>5 2000-01-17 2 3<BR>6
2000-01-21 1 2<BR>7 2000-01-23
2 1<BR>8 2000-01-26 1 1<BR><BR><BR>[
]'s<BR><BR></DIV></BLOCKQUOTE></BODY></HTML>