[R-br] RES: Filtrar por data

Daniel C Bezerra danielcbezerra em gmail.com
Domingo Outubro 14 19:50:18 BRT 2012


Vc formatou como eu sugeri?

Olha só:

ini=as.Date("1961-01-01",origin="1899-12-30",format="%Y-%m-%d")

fim=as.Date("2010-12-31",origin="1899-12-30",format="%Y-%m-%d")

serie=seq.Date(from=ini,to=fim,by="day")

serie<-format(serie,"%Y-%b-%d")

sample(serie,10)
 [1] "1967-Sep-24" "1975-Oct-12" "1969-Dec-23" "1962-Jan-24" "1979-Mar-27"
 [6] "1984-May-14" "1967-Sep-01" "1968-May-30" "1975-May-17" "2007-Jul-23"

serie[grep("Apr-10",serie)]
 [1] "1961-Apr-10" "1962-Apr-10" "1963-Apr-10" "1964-Apr-10" "1965-Apr-10"
 [6] "1966-Apr-10" "1967-Apr-10" "1968-Apr-10" "1969-Apr-10" "1970-Apr-10"
[11] "1971-Apr-10" "1972-Apr-10" "1973-Apr-10" "1974-Apr-10" "1975-Apr-10"
[16] "1976-Apr-10" "1977-Apr-10" "1978-Apr-10" "1979-Apr-10" "1980-Apr-10"
[21] "1981-Apr-10" "1982-Apr-10" "1983-Apr-10" "1984-Apr-10" "1985-Apr-10"
[26] "1986-Apr-10" "1987-Apr-10" "1988-Apr-10" "1989-Apr-10" "1990-Apr-10"
[31] "1991-Apr-10" "1992-Apr-10" "1993-Apr-10" "1994-Apr-10" "1995-Apr-10"
[36] "1996-Apr-10" "1997-Apr-10" "1998-Apr-10" "1999-Apr-10" "2000-Apr-10"
[41] "2001-Apr-10" "2002-Apr-10" "2003-Apr-10" "2004-Apr-10" "2005-Apr-10"
[46] "2006-Apr-10" "2007-Apr-10" "2008-Apr-10" "2009-Apr-10" "2010-Apr-10"


2012/10/14 Gabriel Bruno de Lemos <gblemos em usp.br>

> Obrigado pela resposta Daniel... mas não funcionou... ao aplicar o comando
> serie[grep("Apr-10",serie)] retorna “character(0)”****
>
> ** **
>
> Abs****
>
> ** **
>
> GAbriel****
>
> *De:* r-br-bounces em listas.c3sl.ufpr.br [mailto:
> r-br-bounces em listas.c3sl.ufpr.br] *Em nome de *Daniel C Bezerra
> *Enviada em:* domingo, 14 de outubro de 2012 17:50
> *Para:* r-br em listas.c3sl.ufpr.br
> *Assunto:* Re: [R-br] Filtrar por data****
>
> ** **
>
> Eu resolveria assim:
>
> serie<-format(serie,"%Y-%b-%d")
>
> serie[grep("Apr-10",serie)]
>
> Abs,
>
> D
>
> ****
>
> 2012/10/14 Gabriel Bruno de Lemos <gblemos em usp.br>****
>
> Boa tarde!****
>
>  ****
>
> Tenho um banco de dados com observações diárias durante um período de 50
> anos. Desejo filtrar alguns períodos específicos, tais como todos os dias
> 10/04 de cada ano.****
>
> Alguém saberia como realizar tal busca por data?****
>
> A forma que utilizei para resolver no “jeitinho brasileiro” foi usar o
> Excel para criar uma coluna com o dia e outra com o mês de cada data. Em
> seguida, no R, faço uma busca usando o comando****
>
>  ****
>
> ## Datas****
>
> ini=as.Date("1961-01-01",origin="1899-12-30",format="%Y-%m-%d")****
>
> fim=as.Date("2010-12-31",origin="1899-12-30",format="%Y-%m-%d")****
>
> serie=seq.Date(from=ini,to=fim,by="day")****
>
>  ****
>
> ## Criei o “dados_excel” no Excel usando as funções “Dia()” e “Mês”. Em
> seguida criei a “tabela” no R adicionando estes dois vetores à série “Data”.
> ****
>
>  ****
>
> tabela <- data.frame(serie,dados_excel)****
>
> head(tabela)****
>
> #  dados.Data Dia Mes  Ano****
>
> #1 1961-01-01   1   1 1961****
>
> #2 1961-01-02   2   1 1961****
>
> #3 1961-01-03   3   1 1961****
>
> #4 1961-01-04   4   1 1961****
>
> #5 1961-01-05   5   1 1961****
>
> #6 1961-01-06   6   1 1961****
>
>  ****
>
> head(tabela[tabela$Dia==10 & tabela$Mes==4,])****
>
> #      dados.Data Dia Mes  Ano****
>
> #100   1961-04-10  10   4 1961****
>
> #465   1962-04-10  10   4 1962****
>
> #830   1963-04-10  10   4 1963****
>
> #1196  1964-04-10  10   4 1964****
>
> #1561  1965-04-10  10   4 1965****
>
> #1926  1966-04-10  10   4 1966****
>
>  ****
>
> Este mecanismo funcionou mas gostaria de saber se existe algo mais
> automatizado.****
>
> Obs: O código acima só será reproduzível se  for criado os vetores “Dia” e
> “Mes” (que eu não fiz no R)****
>
>  ****
>
> Att,****
>
>  ****
>
>  ****
>
>  ****
>
>  ****
>
>  ****
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.****
>
> ** **
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20121014/53e6b1d5/attachment.html>


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