r - 创建两个日期之间全天的向量

R中是否有一种简便的方法可以逐项列出在两个指定日期之间发生的所有有效日期？例如，我想要以下输入:

itemizeDates(startDate="12-30-11", endDate="1-4-12")

产生以下日期:

"12-30-11" "12-31-11", "1-1-12", "1-2-12", "1-3-12", "1-4-12"

我对日期的类和格式很灵活，我只需要一个概念的实现即可。

最佳答案

您正在寻找seq

> seq(as.Date("2011-12-30"), as.Date("2012-01-04"), by="days")
[1] "2011-12-30" "2011-12-31" "2012-01-01" "2012-01-02" "2012-01-03"
[6] "2012-01-04"

或者，您可以使用:

> as.Date(as.Date("2011-12-30"):as.Date("2012-01-04"), origin="1970-01-01")
[1] "2011-12-30" "2011-12-31" "2012-01-01" "2012-01-02" "2012-01-03"
[6] "2012-01-04"

这是可以满足您特定要求的功能

itemizeDates <- function(startDate="12-30-11", endDate="1-4-12",
                         format="%m-%d-%y") {
  out <- seq(as.Date(startDate, format=format),
             as.Date(endDate, format=format), by="days")
  format(out, format)
}

> itemizeDates(startDate="12-30-11", endDate="1-4-12")
[1] "12-30-11" "12-31-11" "01-01-12" "01-02-12" "01-03-12" "01-04-12"

关于r - 创建两个日期之间全天的向量，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/14450384/