dates <- seq(from=as.Date("2009-04-07"), to=as.Date("2009-04-14"), by=1)
isHoliday("UnitedStates", dates)
isHoliday("UnitedStates/Settlement", dates) ## same as previous
isHoliday("UnitedStates/NYSE", dates) ## stocks
isHoliday("UnitedStates/GovernmentBond", dates) ## bonds
isHoliday("UnitedStates/NERC", dates) ## energy
Run the code above in your browser using DataLab