[R-br] Extrair Período de datas

[Karina Rebuli]

Para verificar se uma data está contida num intervalo, tem o operador
%within% do lubridate.

Não entendi muito bem se era para lidar com dados de vários anos ou apenas
do ano corrente, então o código abaixo funciona para vários anos. Também
não sabia se você já tem a lista de datas de início e fim do carnaval,
então fiz como se não a tivesse. Veja quais partes do código serão úteis.

#
================================================================================

# Package for creation and validation of dates interval
if( !require( lubridate ) ){ install.packages('lubridate');
library(lubridate); }

# Data simulation
dates <- seq( from = as.Date("2010-01-01"), to = as.Date("2017-12-31"), by
= 1 )

# Carnival begin and finish dates
carnivals <- data.frame( d0 = as.Date( timeDate::Easter( 2010:2017 ) )-51
                         , d1 = as.Date( timeDate::Easter( 2010:2017 ) )-46
)

# Checks which dates are within (%within% operand from lubridate package)
carnivals intervals
dates[ sapply( interval( carnivals$d0, carnivals$d1 )
               , function( x ){ which( dates %within% x ) }) ]

#
================================================================================

Abs,
Karina


On Mon, Jan 23, 2017 at 6:43 PM salah via R-br <r-br em listas.c3sl.ufpr.br>
wrote:

> olá
>
> Bem correto seus comentários Cesar, não compreendi bem o problema.
>
> segue sugestão:
>
> data = seq(as.Date('2016-01-01'), as.Date('2016-12-31'), by = 1)
> DF =  data.frame(data, N = 1:366)
>
> DF[DF$data > "2016-02-05" & DF$data < "2016-02-10",]
>
> ou
>
> subset(DF, data > "2016-02-05" & DF$data < "2016-02-10")
>
>
> saudações
>
> _______________________________________________
> 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 fornea cdigo
> mnimo reproduzvel.
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170124/356eddb2/attachment.html>