cumsum
vec <- c(FALSE, FALSE, TRUE, FALSE, TRUE, TRUE, FALSE, FALSE)
cumsum(!vec)
[1] 1 2 2 3 3 3 4 5
vec <- c(1:5, 5:1)
cummin(vec)
[1] 1 1 1 1 1 1 1 1 1 1
cummax(vec)
[1] 1 2 3 4 5 5 5 5 5 5
cumprod(vec)
[1] 1 2 6 24 120 600 2400 7200 14400 14400
page revision: 3, last edited: 13 Oct 2011 12:28