r - 计算出现次数

Question

我有以下问题。我想计算小于或等于零的值的出现次数。在以下数据示例中，我出现了 3 次 1(0,0,0),2(-1,-2),3(0,0)。 R 中是否有任何内置函数来计算连续出现的次数。

a <- c(2,4,5,3,2,4,7,0,0,0,4,3,2,-1,-2,3,2,0,0,4)

Answer 1

如果要计算值低于零的运行次数:

sum(rle(a <= 0)$values)

这使:

[1] 3

这是如何工作的:

与 rle函数，您创建 a <= 0 的游程编码.

rle(a <= 0)的输出是:

Run Length Encoding
  lengths: int [1:7] 7 3 3 2 2 2 1
  values : logi [1:7] FALSE TRUE FALSE TRUE FALSE TRUE ...

现在你只需要对 rle 的值部分求和-目的:

> sum(rle(a <= 0)$values)
[1] 3