我想通过排除周末来计算两个日期之间的天数。 enter image description here
答案 0 :(得分:1)
您可以创建日期序列(和日期,都用lubrirdate
),过滤出周末并计算行数:
library(dplyr)
library(lubridate)
df <- data_frame(date = seq(ymd("2018-06-01"), ymd("2018-09-30"), by = "days"))
days <- mutate(df, day = wday(date, label = T)) %>%
filter(day != "Sat", day != "Sun") %>%
nrow()
答案 1 :(得分:0)
您可以在库chron的帮助下完成此操作 示例代码:
library(chron)
number_of_days <- (START_DATE,END_DATE,by=1)
length(number_of_days)
length(number_of_days[!is.weekend(number_of_days)])
希望这会有所帮助