如何从日期中减去/添加天数？

Question

我正在尝试构建文件夹来存储数据拉取。我想用拉取数据的日期来标记文件夹。

前任。我从 mysql 中提取 5 天前的数据，我想将文件夹命名为 5 天前的日期。

MySQL可以轻松处理日期运算。我不确定 R 到底是如何做到的。我应该在 POSIXct 中减去适当的秒数，然后转换为 POSIXlt 以将文件夹命名为 MM_DD_YYYY 吗？

或者有更好的方法吗？

Answer 1

只需减去一个数字：

> as.Date("2009-10-01")
[1] "2009-10-01"
> as.Date("2009-10-01")-5
[1] "2009-09-26"

由于 Date 类只有天，因此您可以对其进行基本算术运算。

如果你出于某种原因想使用 POSIXlt，那么你可以使用它的插槽：

> a <- as.POSIXlt("2009-10-04")
> names(unclass(as.POSIXlt("2009-10-04")))
[1] "sec"   "min"   "hour"  "mday"  "mon"   "year"  "wday"  "yday"  "isdst"
> a$mday <- a$mday - 6
> a
[1] "2009-09-28 EDT"

Answer 2

答案可能取决于您的日期采用的格式，但这里是使用 Date 类的示例：

dt <- as.Date("2010/02/10")
new.dt <- dt - as.difftime(2, unit="days")

您甚至可以使用不同的单位，例如周。

Answer 3

当然有一个 lubridate 解决方案：

library(lubridate)
date <- "2009-10-01"

ymd(date) - 5
# [1] "2009-09-26"

相同：

ymd(date) - days(5)
# [1] "2009-09-26"

与其他时间格式

ymd(date) - months(5)
# [1] "2009-05-01"

ymd(date) - years(5)
# [1] "2004-10-01"

ymd(date) - years(1) - months(2) - days(3)
# [1] "2008-07-29"