获取距给定日期一定距离的日期答案

【问题标题】：Obtaining date a set distance away from a given date获取距给定日期一定距离的日期
【发布时间】：2011-08-10 02:42:59
【问题描述】：

如何获得比给定日期晚/早一定数量的日期？例如，如果x <- as.Date("2001-01-01")，我如何获得比x 晚6 个月（2001-07-01）或更早（2000-07-01）的日期？复杂因素包括初始日期的月份日期，或每月的天数。

【问题讨论】：

标签： r date

【解决方案1】：

library(lubridate)
ymd("2001-01-01") + months(6)
ymd("2001-01-01") - months(6)

【讨论】：

【解决方案2】：

seq( as.Date("2001/01/01"), by = "6 months", length = 2)[2]
# [1] "2001-07-01"

【讨论】：