使用R计算特定月份的特定天数

Question

我正在尝试计算 R 中特定月份的星期六和星期日的数量。

因此，例如，如果您在函数中输入月份（例如 2014 年 2 月），它将 return 4 表示星期六，4 表示星期日。但是，如果您输入 Jan-2015，它将 return 5 表示星期六，4 表示星期日。

有什么想法吗？

Answer 1

您可以为此使用 lubridate。这是一个简单的例子。您必须将实际日期传递给它（不过不仅仅是几个月）：

library("lubridate")
weekend_days <- function(x) {
  x <- as.Date(x)
  d <- days_in_month(x)
  d <- x + (0:(d-1))
  sum(wday(d) %in% c(1,7))
}

一些示例（2012 年 1 月和 2 月）：

weekend_days("2012-01-01")
# [1] 9
weekend_days("2012-02-01")
# [1] 8

Using R to count number of specific days in a specific month