根据r中其他数据框中单元格的特定日期将日期转换为时间序列

Question

我需要获取前6个月的所有注册信息，具体针对每个案例。

我想设定一个人为的时间表。因此，所有案例id都有自己的时间表。起点是带有x=A=04的第一行，然后计算倒退/前进的天数并根据天数进行选择。注意：这是一个巨大的数据集，每个x=A04可以有多个id（在示例中未显示）。

我的数据集看起来像这样：

    id x   date
 1: 12 D95 2015-06-19
 2: 12 F85 2015-08-15
 3: 12 A01 2015-03-16
 4: 12 A04 2015-12-20
 5: 10 K20 2017-02-20
 6: 10 B10 2017-09-01
 7: 10 A04 2017-12-11
 8: 10 A84 2017-10-11

可复制数据：

df <- structure(list(id = c(12L, 12L, 12L, 12L, 10L, 10L, 10L, 10L), 
x = c("D95", "F85", "A01", "A04", "K20", "B10", "A04", "A84"), 
date = c("2015-06-19", "2015-03-16", "2015-01-20", "2017-02-20", "2017-09-01", "2017-12-11", "2017-10-11")), 
class = "data.frame", row.names = c(NA, -8L))

我有一个单独的数据集df_s，其中有单行id和最早的date。以为这会有所帮助，但现在我陷入困境...

[单独数据集x=A04的示例：

df_s

这将是我想要的新数据集（天数未精确计算）：

    id date    
 1: 12 2015-12-20 
 2: 10 2017-12-11 

Answer 1

match