# 2nd Friday in January, 2019
x <- year_month_weekday(2019, 1, clock_weekdays$friday, 2)
x
add_months(x, 1:5)
# These don't necessarily correspond to the same day of the month
as_year_month_day(add_months(x, 1:5))
Run the code above in your browser using DataLab