[R-br] Operações com datas

Walmes Zeviani walmeszeviani em gmail.com
Terça Janeiro 17 16:56:01 BRST 2012


Gerar os intervalos e usar cut() com tapply()

### Criando o objeto com datas e a variável climática
x <- as.Date("1994-01-01")
times <- 1:2865
datas <- x+times
datas <- as.data.frame(datas)##Cria o vetor data de 01/01/1994 a 5/11/2001
variavel <- rnorm(2865)## Simula a variável medida no dia
dados <- cbind(datas,variavel)##Cria o objeto
str(dados)

# sequência do dia 1 de cada mês
min(dados$data)
max(dados$data)
x1 <- seq(from=as.Date("1994-01-01"), to=as.Date("2001-11-30"), "month")
str(x1)

# sequência do dia 15 de cada mês
x2 <- seq(as.Date("1994-01-15"), as.Date("2001-11-30"), "month")
str(x2)

# sequência de datas para corte
x <- sort(c(x1,x2))
str(x)

xx <- cut(dados$data, x)
str(xx)

tapply(dados$variavel, xx, length)
tapply(dados$variavel, xx, mean)

À disposição.
Walmes.

==========================================================================
Walmes Marques Zeviani
LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)
Departamento de Estatística - Universidade Federal do Paraná
fone: (+55) 41 3361 3573
VoIP: (3361 3600) 1053 1173
e-mail: walmes em ufpr.br
twitter: @walmeszeviani
homepage: http://www.leg.ufpr.br/~walmes
linux user number: 531218
==========================================================================
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120117/89b40b38/attachment.html>


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