Выбор за несколько дней до указанной даты в R

Question

У меня есть столбец DATE с непрерывными датами в фрейме данных. Я также фрейм данных со списком праздничных дней.

Как выбрать (подмножество) определенное количество дней до отпуска? Например, я хочу выбрать 7 дней перед каждым праздником.

Answer 1

использование outer как в:

rng <- seq(-7, 7) 

DF[DF$dates %in% outer(holidays, rng, "+")] 

или с помощью data.table:

DT <- as.data.table(DF) 
setkey(DT, dates) 
DT[.(outer(holidays, rng, "+")), nomatch=0L]