计算r中连续的年数

use*_*410 2 r count sequence

我有一个包含年份的向量 A:例如。

A <- c(1978, 1979, 1980, 1981, 1984, 1987,1988,1989,1990,1991, 1992)
Run Code Online (Sandbox Code Playgroud)

我希望能够在错过一年之前计算年份的顺序。所以我会寻找我的答案:4, 1, 6

我知道rle用于重复数字的序列,但不确定在这里做什么。

Rol*_*and 5

假设A排序:

A <- c(1978, 1979, 1980, 1981, 1984, 1987,1988,1989,1990,1991, 1992)
B <- cumsum(c(1, diff(A)>1))
rle(B)$lengths
#[1] 4 1 6
Run Code Online (Sandbox Code Playgroud)