r - 从 R 中的当前日期获取上个月的开始日期和结束日期

Question

有没有什么简单的方法可以从 R 中的当前日期获取上个月的开始日期和结束日期？

我只有当前日期。从中，我想获得上个月，上个月的开始日期，上个月的结束日期。

currentDate<-Sys.Date() #return today's date as "2012-11-07"

我希望上个月的开始日期为 2012-10-01，结束日期为今天的 2012-10-31。

Answer 1

许多包都有方便的日期功能，但要推出自己的:

月初功能:

som <- function(x) {
  as.Date(format(x, "%Y-%m-01"))
}

和月末功能(虽然你在这里不需要这个):

eom <- function(x) {
  som(som(x) + 35) - 1
}

那应该能让你继续前进。例如，要获取上个月的结束时间:

som(Sys.Date()) - 1
[1] "2012-10-31"

和月初:

som(som(Sys.Date()) - 1)
[1] "2012-10-01"