Преобразовать вектор дат в вектор дней, прошедших с первой даты

Question

Учитывая вектор 'даты', я хотел бы создать новый вектор, который будет считать прошедшие дни с момента первого элемента.

dates <- c("2019-05-10", "2019-05-11", "2019-05-12", "2019-05-14", "2019-05-15", "2019-05-17")

Цель: elapsed_days <- c(0, 1, 2, 4, 5, 7)

Answer 1

dates = as.Date(dates)
as.double(dates - dates[1], units = "days")
#[1] 0 1 2 4 5 7

Answer 2

Используя пакет lubridate, вы можете конвертировать даты в формат даты, а затем выполнять регулярные вычисления для него:

library(lubridate)

ymd(dates)-min(ymd(dates))

Time differences in days
[1] 0 1 2 4 5 7