如何增加交易日？

Question

例如，在日期为2015年7月3日的日期中，我如何增加30个交易日？

as.Date（“ 07/03/2015”，format =“％d /％m /％Y”）+ 30         [1]“ 2015-04-06”`

这也考虑到周日和周六，我如何仅添加交易日？谢谢

Answer 1

这是您要寻找的吗？

创建数据：

library(chron)
dates <- seq.dates("07/03/2015", by = "day", length = 30)

生成工作日：

dates <- weekdays(as.Date(dates))

提取星期几：

remove <- c('Saturday', 'Sunday')
dates [! dates %in% remove]