Как вычесть / добавить дни от / до даты?

Я пытаюсь создать папки для хранения данных. Я хочу пометить папки с указанием дня этих данных.

Ex. Я вытащил 5 дней назад данные из MySQL. Я хочу назвать папку с датой 5 дней назад.

MySQL может легко обрабатывать арифметику даты. Я не уверен точно, как R делает это. Должен ли я просто вычесть соответствующее количество секунд в POSIXct, а затем преобразовать в POSIXlt, чтобы назвать папку MM_DD_YYYY?

Или есть лучший способ?

3 ответа

Решение

Просто вычтите число:

> 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"

Ответ, вероятно, зависит от того, в каком формате ваша дата, но вот пример, использующий Date учебный класс:

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

Вы даже можете играть с разными юнитами, как недели.

Есть конечно 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"
Другие вопросы по тегам