小编Kri*_*ema的帖子

我想基于第三个专栏创建两个新专栏。这两列应该具有两种不同类型的递增值。

让\xc2\xb4s以以下数据集为例：

events <- data.frame(Frame = seq(from = 1001, to = 1033, by = 1),\n                     Value = c(2.05, 0, 2.26, 2.38, 0, 0, 2.88, 0.32, 0.85, 2.85, 2.09, 0, 0, 0, 1.11, 0, 0,\n                               0, 2.46, 2.85, 0, 0, 0.38, 1.91, 0, 0, 0, 2.23, 0, 0.48, 1.83, 0.23, 1.49))\n

我想创建：

\n
• 每当“Value”列中存在以 0 开头的序列时，名为“Number”的列就会递增，并且
\n
• 每当“值”列中出现新的 0 序列时，称为“持续时间”的列就从 1 开始，并且只要 0 序列继续存在，就以 1 递增。
\n

理想情况下，最终的数据框应该是这样的：

events_final <- data.frame(Frame = seq(from = 1001, …