on_easter <- yearly() %>% recur_on_easter()
on_easter_monday <- yearly() %>% recur_on_easter(-1)
alma_search("1999-01-01", "2001-01-01", on_easter)
rb <- runion() %>%
add_rschedule(on_easter) %>%
add_rschedule(on_easter_monday)
alma_search("1999-01-01", "2001-01-01", rb)
# Note that `offset` must land within the same year, otherwise the date
# is ignored
on_easter_back_93_days <- yearly() %>% recur_on_easter(-93)
on_easter_back_94_days <- yearly() %>% recur_on_easter(-94)
alma_search("1999-01-01", "2001-01-01", on_easter_back_93_days)
alma_search("1999-01-01", "2001-01-01", on_easter_back_94_days)
Run the code above in your browser using DataLab