R 让它工作起来有困难

我尝试使用bizdays包生成一个向量，其中包含两个日期之间的公交天数

fer = as.data.frame(as.Date(fer[1:938]))

#Define default calendar
bizdays.options$set(default.calendar=fer)

dt1 = as.Date(Sys.Date())
dt2 = as.Date(Sys.Date()-(365*10)) #sample 10 year window

#Create date vector
datas = bizseq(dt2, dt1)

我得到这个错误：“bizseq.Date（dt2，dt1）中的错误：给定的日期超出范围。” bizdays等人的任何函数都具有相同的行为

---

有什么想法吗？

如果

fer

是节假日，你可以试试：

bizdays.options$set(default.calendar=Calendar(holidays=fer))

---

我也有类似的问题，但无法将公认的答案应用到我的案例中。对我来说，有效的方法是确保向量

假日中的第一个和最后一个假日至少覆盖（或超过）提供给
bizdays（）的日期范围

这项工作（
从_date
和
到_date
都在
假日
提供的第一个和最后一个假日内）：

Tks HubertL，你的解决方案成功了！还必须设置周末：bizdays.options$set（默认为.calendar=calendar（假日=fer，工作日=c（“周六”、“周日”））
   library(bizdays)

   holidays <- c("2016-08-10", "2016-08-13")

    from_date <- "2016-08-11"
    to_date <- "2016-08-12"

    cal <- Calendar(holidays, weekdays=c('sunday', 'saturday'))
    bizdays(from_date, to_date, cal)

    #1

    holidays <- c("2016-08-10", "2016-08-11")

    from_date <- "2016-08-11"
    to_date <- "2016-08-12"

    cal <- Calendar(holidays, weekdays=c('sunday', 'saturday'))
    bizdays(from_date, to_date, cal)

   # Error in bizdays.Date(from, to, cal) : Given date out of range.