Find the "next" or "previous" values in a vector. Useful for comparing values ahead of or behind the current values.
lead(x, n = 1L, default = NA, order_by = NULL, ...) lag(x, n = 1L, default = NA, order_by = NULL, ...)
x | a vector of values |
---|---|
n | a positive integer of length 1, giving the number of positions to lead or lag by |
default | value used for non-existent rows. Defaults to |
order_by | override the default ordering to use another vector |
... | Needed for compatibility with lag generic. |
lead(1:10, 1)#> [1] 2 3 4 5 6 7 8 9 10 NAlead(1:10, 2)#> [1] 3 4 5 6 7 8 9 10 NA NAlag(1:10, 1)#> [1] NA 1 2 3 4 5 6 7 8 9lead(1:10, 1)#> [1] 2 3 4 5 6 7 8 9 10 NA#> ahead x behind #> [1,] 0.2971619 0.9661595 NA #> [2,] 0.2906483 0.2971619 0.9661595 #> [3,] 0.8597222 0.2906483 0.2971619 #> [4,] 0.1933127 0.8597222 0.2906483 #> [5,] NA 0.1933127 0.8597222# Use order_by if data not already ordered df <- data.frame(year = 2000:2005, value = (0:5) ^ 2) scrambled <- df[sample(nrow(df)), ] wrong <- mutate(scrambled, prev = lag(value)) arrange(wrong, year)#> year value prev #> 1 2000 0 1 #> 2 2001 1 NA #> 3 2002 4 25 #> 4 2003 9 16 #> 5 2004 16 0 #> 6 2005 25 9#> year value prev #> 1 2000 0 NA #> 2 2001 1 0 #> 3 2002 4 1 #> 4 2003 9 4 #> 5 2004 16 9 #> 6 2005 25 16