r - 为动物园对象创建滞后

Question

我一直在使用以下方法为动物园对象创建滞后econ$gdp4 <- lag(econ$gdp, k = -4, na.pad = TRUE)。我在对象中有大约 6 列econ要为其创建滞后，并且我想为周期 1 到 9 创建滞后。有没有办法使用循环来创建这些？

Answer 1

假设 z 是我们的动物园对象。假设我们希望第 2、3、4 列以及原始列的所有列都有 9 个滞后。然后尝试：

merge(z, lag(z[, 2:4], -(1:9)))

另请注意，滞后 0 会返回相同的列，因此这会给出每列的原始滞后和 9 个滞后：

lag(z, -(0:9))