Как найти номер недели от произвольной даты начала в R?

Question

Как мне найти номер недели по произвольной дате начала в R. Допустим, я хочу, чтобы моя дата начала была 1 августа.

Answer 1

Используя lubridate, вы можете сделать:

interval(today(), dmy("21-08-2020"))/weeks(1)

[1] 30.42857

Или от даты интереса до другой даты:

interval(dmy("21-08-2020"), dmy("21-09-2020"))/weeks(1)

[1] 4.428571

Answer 2

Вы можете использовать difftime для этого:

difftime("2020-08-21", Sys.Date(), units = "weeks")
# Time difference of 30.45238 weeks