Last chance! 50% off unlimited learning
Sale ends in
Returns the number of work days between two dates taking into account the provided holiday dates.
CountWorkDays(from, to, holiday = NULL, nonworkdays = c("Sat", "Sun"))the initial dates
the final dates
a vector with dates to be excluded.
a character vector containing the abbreviations of the weekdays (as in day.abb) to be considered non work days. Default is c("Sat","Sun").
an integer vector
The function is vectorised so that multiple initial and final dates can be supplied. The dates are recycled, if their number are different
weekdays, Date Functions
# NOT RUN {
from <- as.Date("2019-01-01") + rep(0, 10)
to <- as.Date("2020-01-15") + seq(0, 9)
CountWorkDays(from, to)
x <- seq(from[1], from[1]+11, "days")
data.frame(
date = x,
day = Format(x, fmt="ddd"))
CountWorkDays(from = min(x), to = max(x), holiday = c("2019-01-06", "2019-01-07"))
# }
Run the code above in your browser using DataLab