r - 如何计算R中1之间的0数？

Question

关闭。这个问题需要更多focused .它目前不接受答案。












想改善这个问题吗？更新问题，使其仅关注一个问题 editing this post .

5年前关闭。




Improve this question




我将一些降水数据转换为二进制数据，其中 1 = 降水事件，0 = 无降水。数据集有超过 35,000 个值，但这里是我的数据如下所示的示例:

x = 1, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1.

我想计算没有事件的连续天数，因此我的输出如下所示:

y = 2, 3, 6, 2.

我曾尝试使用帮助站点，但建议的解决方案均无效。

Answer 1

我们可以使用 rle

with(rle(x), lengths[!values])
#[1] 2 3 6 2

如果向量末尾有 '0'，我们可以从第一个 1 到最后一个 1 开始计数

x1 <- x[Reduce(':',as.list(range(which(x==1))))]
with(rle(x1), lengths[!values])