如何在 R 中的 bizdays() 中包含 "from" 天

Question

假设我做了以下事情：

create.calendar(name='MyCalendar', weekdays=c('sunday', 'saturday'),
            adjust.from=adjust.next, adjust.to=adjust.previous)
bizdays.options$set(default.calendar='MyCalendar')

现在，我想计算2020-11-23和2020-11-27之间（包括11月23日和27日）的工作日数。

然而，当我使用 bizdays():

bizdays("2020-11-23", "2020-11-27")

输出为“4”。我想得到一个“5”来包括所有的日子。我怎样才能做到这一点？

谢谢！

Answer 1

我们只想在工作日时包含 from，即 is.bizday(from)==TRUE 因此我们可以编写以下函数：

library(bizdays)
bizdays_inc <- function (from, to, cal = bizdays.options$get("default.calendar")) 
{
    is.bizday(from) + bizdays(from, to, cal)
}
bizdays_inc("2020-11-23", "2020-11-27")
[1] 5

或者如果我们在日历中将财务标志设置为 FALSE：

create.calendar(name='MyCalendar', weekdays=c('sunday', 'saturday'),
            adjust.from=adjust.next, adjust.to=adjust.previous, financial=F)
bizdays.options$set(default.calendar='MyCalendar')

bizdays("2020-11-23", "2020-11-27")
[1] 5

如何在 R 中的 bizdays() 中包含 "from" 天

How to include "from" day in bizdays() in R

time

r

date

data-science

bizdays