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