Skip to contents

alma_step() is useful for shifting dates by "n business days".

alma_step() steps over a sequence of dates 1 day at a time, for n days. After each step, an adjustment is applied to shift to the next non-event date.


alma_step(x, n, rschedule)




A vector of dates.



The number of days to step. Can be negative to step backwards.



An rschedule, such as an rrule, runion, rintersect, or rsetdiff.


A Date vector the same size as x shifted by n steps.


Imagine you are on a Friday and want to shift forward 2 days using an rrule that marks weekends as events. alma_step() works like this:

  • Step forward 1 day to Saturday.

  • Apply an adjustment of adj_following(), which rolls forward to Monday.

  • Step forward 1 day to Tuesday.

  • Apply an adjustment of adj_following(), but no adjustment is required.

This lends itself naturally to business logic. Two business days from Friday is Tuesday.


# Make a rrule for weekends
on_weekends <- weekly() %>%

# "Step forward by 2 business days"
# 2019-09-13 is a Friday.
# Here we:
# - Step 1 day to Saturday
# - Adjust to Monday
# - Step 1 day to Tuesday
alma_step("2019-09-13", 2, on_weekends)
#> [1] "2019-09-17"

# If Monday, 2019-09-16, was a recurring holiday, we could create
# a custom runion and step over that too.
on_09_16 <- yearly() %>%
  recur_on_month_of_year(9) %>%

rb <- runion(on_09_16, on_weekends)

alma_step("2019-09-13", 2, rb)
#> [1] "2019-09-18"