Let us suppose I have a reference date dates and I offset that date
by curd current days. bizdayse returns the business days
between the reference date and the new date offset by curd current
days.
This is equivalent to
refdate <- Sys.Date()
curd <- 10
newdate <- refdate + 10 # offset refdate by 10 days
# this is equals to bizdayse(refdate, 10)
bizdays(refdate, newdate)