如何知道某个事件是发生在其他事件之后还是期间

问：

我试图了解疗养院中目前正在服用一系列药物的患者是否在某种药物、某种感兴趣的药物和死亡之间有任何其他药物。感兴趣的药物是布洛芬

id <- c('1', '1', '1','1','2','2','2')
drug <- c('ibuprofen','aleve','tylenol','claritin', 'ibuprofen','aleve','tums')
start <- c('100','105','50','115','20','-9','30')
death <- c('120','120','120','120','50','50','50')

我期待看到的结果表显示了布洛芬之后和死亡前服用的药物

id <- c('1','1','2')
drug <- c('aleve','claritin','tums')
start <- c('105','115','30)

到目前为止，这是我拥有的代码，我只是过滤掉了向患者展示想要的药物。但我被困在如何前进上。

y <- df %>%
  filter(drug == "ibuprofen")