df <- data.frame(
year = c(2000, 2001, 2002, 2003, 2004),
country = c("A", "A", "B", "B", "C"),
gdp = c(1, 2, 3, 4, 5),
gdp_lagged = c(NA, 1, 2, 3, 4)
)
join_lagged_col(df, gdp, gdp_lagged, year, country, 1)
Run the code above in your browser using DataLab