# NOT RUN {
create.calendar("Brazil/ANBIMA", holidaysANBIMA, weekdays=c("saturday", "sunday"))
bizdays("2013-01-02", "2013-01-31", "Brazil/ANBIMA")
# Once you have a default calendar set, cal does not need to be provided
bizdays.options$set(default.calendar="Brazil/ANBIMA")
bizdays("2013-01-02", "2013-01-31")
dates <- bizseq("2013-01-01", "2013-01-10")
bizdays(dates, "2014-01-31")
# }
Run the code above in your browser using DataLab