Lagged percentage change

Usage

chg_pct(x, n = 1L, fill_na = 0L)

Arguments

x: numeric vector
n: values to offset
fill_na: fill value for any NAs; default is 0

Examples

mock_provider(2020:2025) |>
  dplyr::mutate(change = chg_pct(payment), .by = group)
#> # A tibble: 12 × 4
#>     year group payment change
#>    <int> <chr>   <int>  <dbl>
#>  1  2020 A       17963  0    
#>  2  2021 A       11839 -0.341
#>  3  2022 A       19177  0.620
#>  4  2023 A       11314 -0.410
#>  5  2024 A       18321  0.619
#>  6  2025 A       13926 -0.240
#>  7  2020 B       17017  0    
#>  8  2021 B       18834  0.107
#>  9  2022 B       11829 -0.372
#> 10  2023 B       16595  0.403
#> 11  2024 B       10745 -0.353
#> 12  2025 B       12624  0.175