我有一组多年的日期,我想知道如何使用参考点将它们放置在相同的比例上。
例如,我有以下日期:
“ 2018-04-15”“ 2018-04-30”“ 2018-05-06”“ 2018-05-12”“ 2018-05-13”
我想创建一个单独的列来计算这些日期来自
的天数“ 2018-11-06”。
非常感谢!
答案 0 :(得分:0)
您可以像这样使用difftime
library(data.table)
## Create data
df <- data.table(Date = c("2018-04-15", "2018-04-30", "2018-05-06", "2018-05-12", "2018-05-13"))
reference <- "2018-11-06"
## Calculate difference in dates in days
df <- df[,DaysFromRef := difftime(as.Date(reference), as.Date(Date), "days")]
df
Date DaysFromRef
1: 2018-04-15 205 days
2: 2018-04-30 190 days
3: 2018-05-06 184 days
4: 2018-05-12 178 days
5: 2018-05-13 177 days
## Convert DaysFromRef column to numeric
df$DaysFromRef <- as.numeric(df$DaysFromRef)