按组累计最小值

Question

我想在给定的组内计算累积最小值。

我的当前数据框架：

Group <- c('A', 'A', 'A','A', 'B', 'B', 'B', 'B') 
Target <- c(1, 0, 5, 0, 3, 5, 1, 3) 
data <- data.frame(Group, Target))

我的期望输出：

Desired.Variable <- c(1, 0, 0, 0, 3, 3, 1, 1)
data <- data.frame(Group, Target, Desired.Variable))

任何关于这方面的帮助都将不胜感激！

- Lisa

---

通常情况下，这被称为累积最小值，而不是滚动最小值。 - G. Grothendieck

Answer 1

我们可以通过分组使用 cummin 函数。

data$output <- with(data, ave(Target, Group, FUN = cummin))

data
#  Group Target output
#1     A      1      1
#2     A      0      0
#3     A      5      0
#4     A      0      0
#5     B      3      3
#6     B      5      3
#7     B      1      1
#8     B      3      1

其等效的 dplyr 和 data.table

library(dplyr)
data %>%
  group_by(Group) %>%
  mutate(output = cummin(Target))

library(data.table)
setDT(data)[, output := cummin(Target), by = (Group)]

- Ronak Shah