R - 连续情况的序列，其中end1 == start2

Question

拿这个数据集......

test <- data.frame(
    t1=c(2,3,5,6,7,10,10),
    t2=c(3,4,6,7,8,11,12),
    id=1:7
)

......看起来像这样。 为了澄清，每一行都是先前确定的两个必须保持绑定在一起的案例的链接。

  t1 t2 id
1  2  3  1
2  3  4  2
3  5  6  3
4  6  7  4
5  7  8  5
6 10 11  6
7 10 12  7

我希望能够递归地识别基于t2 == t1的连续序列，以便链接为：

link1 -  2-3,3-4
link2 -  5-6,6-7,7-8
link3 -  10-11
link4 -  10-12

我正在寻找的最终结果是：

  t1 t2 id matchid
1  2  3  1       1
2  3  4  2       1
3  5  6  3       2
4  6  7  4       2
5  7  8  5       2
6 10 11  6       3
7 10 12  7       4

我已尝试使用match(test$t2,test$t1)来获取初始链接，但现在却陷入了如何继续链接过程的困境。 我的想法一直在回到使用循环，这听起来像是一种可怕的方式。

Answer 1

这是一种方法：

test$matchid <- c(1, 1 + cumsum(tail(test$t1, -1) != head(test$t2, -1)))