R：有没有一种方法可以计算每行中连续数字的数量？

Question

我想知道是否有一种方法可以计算每行中连续数字的数量。理想情况下，输出将在V6列中，并对V1-V5列中的连续数字进行计数。

例如，第1-1、2、3、4、5行，因为有5个连续数字，输出将为5。我已附加下面的数据集供您参考。

谢谢。

enter image description here

Answer 1

rowSums((df1[-1] - df1[-ncol(df1)]) == 1) + 1
#[1] 5 4 4 4 4 4 4 4 4 4

数据

df1 <- data.frame(V1 = 1, V2 = 2, V3 = 3, V4 = 4, V5 = 5:14)