时间间隔重叠Lubridate - 它是否与间隔列表一起使用

Question

我有两个数据集，都有单独的事件，我想知道哪个事件同时发生在另一个事件上，所以：

我创建了两个区间：

library(lubridate) time.interval <- y$Minstart %--% y$Maxstart velointerval <- x$start_date %--% x$end_date

这给了我两个间隔，一个是90 000个元素，另一个是200 000个元素

然后我尝试知道一个数据集中的哪些事件与另一个数据集

同时发生

x$e <- int_overlaps(time.interval,velointerval) rrr = (x[,"e"]=="TRUE") x <- x[rrr,]

但由于某些原因，这只给了我TRUE，但我知道还有更多

编辑： 第一个数据集看起来像这样

第二个像这样：

如果其他数据集中的某个事件同时发生，我希望得到的每一行的值为TRUE or FALSE